diff options
author | Sharlatan Hellseher <sharlatanus@gmail.com> | 2022-11-01 21:34:23 +0000 |
---|---|---|
committer | Guillaume Le Vaillant <glv@posteo.net> | 2022-11-03 15:07:16 +0100 |
commit | 53c8cbb31428322e16c255f73fb7f7670ef7f8aa (patch) | |
tree | e85fe7b8c15259cc6d820d20d72ff1d57943fd77 | |
parent | e2802132e36ea8157da1c1c06217e4561b6cd79f (diff) | |
download | guix-53c8cbb31428322e16c255f73fb7f7670ef7f8aa.tar.gz |
gnu: Add cl-hu.dwim.graphviz.
* gnu/packages/lisp-xyz.scm (ecl-hu.dwim.graphviz, cl-hu.dwim.graphviz, sbcl-hu.dwim.graphviz): New variables. Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
-rw-r--r-- | gnu/packages/lisp-xyz.scm | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index 80a35f9dd1..f8b5c71752 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -84,6 +84,7 @@ #:use-module (gnu packages glib) #:use-module (gnu packages gnome) #:use-module (gnu packages gnupg) + #:use-module (gnu packages graphviz) #:use-module (gnu packages gtk) #:use-module (gnu packages image) #:use-module (gnu packages imagemagick) @@ -1868,6 +1869,47 @@ documentation system, explicit development support, etc.") (define-public ecl-hu.dwim.asdf (sbcl-package->ecl-package sbcl-hu.dwim.asdf)) +(define-public sbcl-hu.dwim.graphviz + (let ((commit "31522ca8b9a04d535b7cec20ef24d8bf3b26d52b") + (revision "1")) + (package + (name "sbcl-hu.dwim.graphviz") + (version (git-version "0.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/hu-dwim/hu.dwim.graphviz") + (commit commit))) + (file-name (git-file-name "cl-hu.dwim.graphviz" version)) + (sha256 + (base32 "0cz5g7d6817ajypp876k9m65sxxlf42x4bg04ya73aqci5s1vjwy")))) + (build-system asdf-build-system/sbcl) + (arguments + (list #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-graphviz-lib-path + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "source/package.lisp" + (("libgvc.so") + (search-input-file inputs "/lib/libgvc.so")))))))) + (native-inputs + (list sbcl-hu.dwim.common sbcl-hu.dwim.stefil)) + (inputs + (list graphviz sbcl-cffi sbcl-metabang-bind)) + (home-page "https://github.com/hu-dwim/hu.dwim.graphviz") + (synopsis "Graphviz layouting using CFFI bindings") + (description + "This package provides CFFI bindings to the Graphviz library in Common +Lisp.") + (license license:public-domain)))) + +(define-public cl-hu.dwim.graphviz + (sbcl-package->cl-source-package sbcl-hu.dwim.graphviz)) + +(define-public ecl-hu.dwim.graphviz + (sbcl-package->ecl-package sbcl-hu.dwim.graphviz)) + (define-public sbcl-babel ;; No release since 2014. (let ((commit "f892d0587c7f3a1e6c0899425921b48008c29ee3") |