aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/guile.scm
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2016-06-19 14:22:02 -0400
committerMark H Weaver <mhw@netris.org>2016-06-19 14:22:53 -0400
commit84530eef766d3dbe73d07593531d07c35a1be9ed (patch)
tree7b64129c6e6eeeddf367e5dd290323137b4e6796 /gnu/packages/guile.scm
parentc0eeccbc2486572de1ef88249c63bc71c28dfef6 (diff)
parent3ebba94d45e4cc9c5242f812b29c826904506b02 (diff)
downloadguix-84530eef766d3dbe73d07593531d07c35a1be9ed.tar
guix-84530eef766d3dbe73d07593531d07c35a1be9ed.tar.gz
Merge branch 'master' into core-updates
Diffstat (limited to 'gnu/packages/guile.scm')
-rw-r--r--gnu/packages/guile.scm49
1 files changed, 49 insertions, 0 deletions
diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 7c0254e3b6..9b761b10b5 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -706,6 +706,55 @@ inspired by the SCSH regular expression system.")
Guile's foreign function interface.")
(license gpl3+)))
+(define-public guile-sqlite3
+ (let ((commit "607721fe1174a299e45d457acacf94eefb964071"))
+ (package
+ (name "guile-sqlite3")
+ (version (string-append "0.0-0." (string-take commit 7)))
+
+ ;; XXX: Gitorious being dead, this is not a reliable home page.
+ (home-page "https://www.gitorious.org/guile-sqlite3/guile-sqlite3.git/")
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url home-page)
+ (commit commit)))
+ (sha256
+ (base32
+ "09gaffhh5rawz5kdmqx2ahvj1ngvxddp469r18bmjz3sz8p0slj2"))
+ (file-name (string-append name "-" version "-checkout"))
+ (modules '((guix build utils)))
+ (snippet
+ ;; Upgrade 'Makefile.am' to the current way of doing things.
+ '(substitute* "Makefile.am"
+ (("TESTS_ENVIRONMENT")
+ "TEST_LOG_COMPILER")))))
+
+ (build-system gnu-build-system)
+ (native-inputs
+ `(("autoconf" ,autoconf)
+ ("automake" ,automake)
+ ("pkg-config" ,pkg-config)))
+ (inputs
+ `(("guile" ,guile-2.0)
+ ("sqlite" ,sqlite)))
+ (arguments
+ '(#:phases (modify-phases %standard-phases
+ (add-before 'configure 'autoreconf
+ (lambda _
+ (zero? (system* "autoreconf" "-vfi"))))
+ (add-before 'build 'set-sqlite3-file-name
+ (lambda* (#:key inputs #:allow-other-keys)
+ (substitute* "sqlite3.scm"
+ (("\"libsqlite3\"")
+ (string-append "\"" (assoc-ref inputs "sqlite")
+ "/lib/libsqlite3\"")))
+ #t)))))
+ (synopsis "Access SQLite databases from Guile")
+ (description
+ "This package provides Guile bindings to the SQLite database system.")
+ (license gpl3+))))
+
(define-public haunt
(package
(name "haunt")