diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-06-18 15:09:08 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-06-18 15:54:45 +0200 |
commit | e8ac1f8f1fad72a1f5159d47a4f7a0b55557ef1d (patch) | |
tree | 739d832d608cc9ec0e6a44183685cc9abcef05c4 /gnu/packages | |
parent | 87a16de7441cf6af8e786a5bcba854c5e1484599 (diff) | |
download | guix-patches-e8ac1f8f1fad72a1f5159d47a4f7a0b55557ef1d.tar guix-patches-e8ac1f8f1fad72a1f5159d47a4f7a0b55557ef1d.tar.gz |
gnu: Add guile-sqlite3.
* gnu/packages/guile.scm (guile-sqlite3): New variable.
Diffstat (limited to 'gnu/packages')
-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 6f00edb06b..6e4722c182 100644 --- a/gnu/packages/guile.scm +++ b/gnu/packages/guile.scm @@ -705,6 +705,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") |