From e7ea6b4b32f74ac5240c34f45386a4ce63b2ce71 Mon Sep 17 00:00:00 2001
From: nixo <nicolo@nixo.xyz>
Date: Thu, 10 Oct 2019 22:51:16 +0200
Subject: [PATCH] gnu: Add julia-codeczlib.

* gnu/packages/julia-xyz.scm (julia-codeczlib-0.6.0): New variable.
---
 gnu/packages/julia-xyz.scm | 43 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 43 insertions(+)

diff --git a/gnu/packages/julia-xyz.scm b/gnu/packages/julia-xyz.scm
index 60ba99160c..a20c7119a7 100644
--- a/gnu/packages/julia-xyz.scm
+++ b/gnu/packages/julia-xyz.scm
@@ -21,6 +21,7 @@
   #:use-module (guix git-download)
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix packages)
+  #:use-module (gnu packages compression)
   #:use-module (gnu packages tls))
 
 (define-public julia-uriparser
@@ -298,3 +299,45 @@ you expect,
 @item extensible: you can define a new codec to transcode data
 @end enumerate")
     (license license:expat)))
+
+(define-public julia-codeczlib
+  (package
+    (name "julia-codeczlib")
+    (version "0.6.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/bicycle1885/CodecZlib.jl")
+             (commit (string-append "v" version))))
+       (file-name "CodecZlib")
+       (sha256
+        (base32 "18j5lhcsgln4ng5ik0y1s194q1a8h4828wwp4ws5vqc9i2spn8mb"))))
+    (propagated-inputs `(("julia-transcodingstreams" ,julia-transcodingstreams)
+                         ("julia-binaryprovider" ,julia-binaryprovider)
+                         ("zlib" ,zlib)))
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (delete 'reset-gzip-timestamps)
+         (add-before 'precompile 'build-deps
+           (lambda* (#:key outputs source inputs #:allow-other-keys)
+             (let ((f (open-file
+                       (string-append
+                        (assoc-ref outputs "out")
+                        "/share/julia/packages/"
+                        (string-append
+                         (strip-store-file-name source) "/deps/deps.jl"))
+                       "w")))
+               (display (string-append "const libz = \""
+                                       (assoc-ref inputs "zlib")
+                                       "/lib/libz.so\"\n") f)
+               (display "check_deps() = true\n" f)
+               (close-port f))
+             #t)))))
+    (build-system julia-build-system)
+    (home-page "https://github.com/bicycle1885/CodecZlib.jl")
+    (synopsis "@code{Zlib} codecs for @code{TranscodingStreams}")
+    (description "@code{CodecZlib} provides Zlib bindings for the
+@code{TranscodingStreams} interface.")
+    (license license:expat)))