Add fallback package for guile-lzlib

1 files changed, 39 insertions, 0 deletions

diff --git a/guix-dev.scm b/guix-dev.scm
index 55cb391..dcc5d16 100644
--- a/guix-dev.scm
+++ b/guix-dev.scm
@@ -133,6 +133,45 @@ Guile's foreign function interface.")
         (home-page "https://notabug.org/guile-zlib/guile-zlib")
         (license license:gpl3+))))
 
+(define guile-lzlib
+  (if (defined? 'guile-lzlib
+        (resolve-interface '(gnu packages guile)))
+      guile-lzlib
+      (package
+        (name "guile-lzlib")
+        (version "0.0.2")
+        (source
+         (origin
+           (method url-fetch)
+           (uri
+            (string-append "https://notabug.org/guile-lzlib/guile-lzlib/archive/"
+                           version ".tar.gz"))
+           (file-name (string-append name "-" version ".tar.gz"))
+           (sha256
+            (base32
+             "11sggvncyx08ssp1s5xii4d6nskh1qwqihnbpzzvkrs7sivxn8w6"))))
+        (build-system gnu-build-system)
+        (arguments
+         '(#:make-flags
+           '("GUILE_AUTO_COMPILE=0"))) ;to prevent guild warnings
+        (native-inputs
+         `(("autoconf" ,autoconf)
+           ("automake" ,automake)
+           ("pkg-config" ,pkg-config)
+           ,@(if (%current-target-system)
+                 `(("guile" ,guile-3.0))   ;for 'guild compile' and 'guile-3.0.pc'
+                 '())))
+        (inputs
+         `(("guile" ,guile-3.0)
+           ("lzlib" ,lzlib)))
+        (synopsis "Guile bindings to lzlib")
+        (description
+         "This package provides Guile bindings for lzlib, a C library for
+in-memory LZMA compression and decompression.  The bindings are written in
+pure Scheme by using Guile's foreign function interface.")
+        (home-page "https://notabug.org/guile-lzlib/guile-lzlib")
+        (license license:gpl3+))))
+
 (package
   (name "guix-build-coordinator")
   (version "0.0.0")