07/14: gnu: Add sbcl-iolib.grovel.

[guix-commits]

ambrevar pushed a commit to branch master
in repository guix.

commit 216dd6f6af4d3bffd8c20ae67b4cd15be1a82d43
Author: Pierre Neidhardt <address@hidden>
Date:   Wed May 29 15:22:53 2019 +0200

    gnu: Add sbcl-iolib.grovel.
    
    * gnu/packages/lisp.scm (sbcl-iolib.grovel): New variable.
---
 gnu/packages/lisp.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
index 4dc56ad..06c418f 100644
--- a/gnu/packages/lisp.scm
+++ b/gnu/packages/lisp.scm
@@ -5792,3 +5792,25 @@ and @code{kqueue(2)}), a pathname library and 
file-system utilities.")
     (arguments
      '(#:asd-file "iolib.base.asd"))
     (synopsis "Base package for IOLib, a Common Lisp I/O library")))
+
+(define-public sbcl-iolib.grovel
+  (package
+    (inherit sbcl-iolib.asdf)
+    (name "sbcl-iolib.grovel")
+    (inputs
+     `(("iolib.asdf" ,sbcl-iolib.asdf)
+       ("iolib.conf" ,sbcl-iolib.conf)
+       ("iolib.base", sbcl-iolib.base)
+       ("cffi", sbcl-cffi)))
+    (arguments
+     '(#:asd-file "iolib.grovel.asd"
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'install 'install-header
+           (lambda* (#:key outputs #:allow-other-keys)
+             ;; This header is required by sbcl-iolib.
+             (install-file "src/grovel/grovel-common.h"
+                           (string-append (assoc-ref outputs "out")
+                                          "/lib/sbcl"))
+             #t)))))
+    (synopsis "CFFI Groveller for IOLib, a Common Lisp I/O library")))