diff options
author | Mark H Weaver <mhw@netris.org> | 2016-06-19 14:22:02 -0400 |
---|---|---|
committer | Mark H Weaver <mhw@netris.org> | 2016-06-19 14:22:53 -0400 |
commit | 84530eef766d3dbe73d07593531d07c35a1be9ed (patch) | |
tree | 7b64129c6e6eeeddf367e5dd290323137b4e6796 /gnu/packages/guile.scm | |
parent | c0eeccbc2486572de1ef88249c63bc71c28dfef6 (diff) | |
parent | 3ebba94d45e4cc9c5242f812b29c826904506b02 (diff) | |
download | guix-84530eef766d3dbe73d07593531d07c35a1be9ed.tar.gz |
Merge branch 'master' into core-updates
Diffstat (limited to 'gnu/packages/guile.scm')
-rw-r--r-- | gnu/packages/guile.scm | 49 |
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") |