1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75
(define-module (hidamari-blue guile-pg) #:use-module ((guix licenses) #:renamer (symbol-prefix-proc 'license:)) #:use-module (gnu packages) #:use-module (gnu packages aspell) #:use-module (gnu packages bash) #:use-module (gnu packages bdw-gc) #:use-module (gnu packages gawk) #:use-module (gnu packages gperf) #:use-module (gnu packages libffi) #:use-module (gnu packages autotools) #:use-module (gnu packages flex) #:use-module (gnu packages libunistring) #:use-module (gnu packages tls) #:use-module (gnu packages m4) #:use-module (gnu packages multiprecision) #:use-module (gnu packages pkg-config) #:use-module (gnu packages readline) #:use-module (gnu packages ncurses) #:use-module (gnu packages ed) #:use-module (gnu packages base) #:use-module (gnu packages texinfo) #:use-module (gnu packages man) #:use-module (gnu packages gettext) #:use-module (gnu packages databases) #:use-module (gnu packages python) #:use-module (gnu packages gl) #:use-module (gnu packages sdl) #:use-module (gnu packages maths) #:use-module (gnu packages image) #:use-module (gnu packages xdisorg) #:use-module (gnu packages guile) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix git-download) #:use-module (guix build-system gnu) #:use-module (guix build-system trivial) #:use-module (guix utils) #:use-module (ice-9 match)) (define-public guile-pg (package (name "guile-pg") (version "0.47") (source (origin (method url-fetch) (uri (string-append "http://download.savannah.gnu.org/releases/guile-pg/guile-pg-" version ".tar.xz")) (sha256 (base32 "0h3p0zw5x233k7ax1lbfhzchwyrnw12bv7jn3qw3f2vr1ckscw0x")) ;; (modules '((guix build utils))) ;; (snippet ;; ;; guile postgresql packages does not prefix the includes ;; '(begin ;; (substitute* "src/guile-dbd-postgresql.c" ;; (("#include <postgresql/") ;; "#include <")))) )) (build-system gnu-build-system) (arguments '(#:tests? #f)) (native-inputs `(("pkg-config" ,pkg-config))) (inputs `(("guile" ,(@ (gnu packages guile) guile-2.0)) ("zlib" ,(@ (gnu packages compression) zlib)))) (propagated-inputs `(("postgresql" ,postgresql) ("openssl" ,openssl))) (synopsis "Guile DBI driver for SQLite") (home-page "https://github.com/jkalbhenn/guile-dbd-sqlite3") (description "guile-dbi is a library for Guile that provides a convenient interface to SQL databases. This package implements the interface for Postgresql.") (license license:gpl3+)))