05/11: gnu: Add cl-trivial-gray-streams.

[???]

iyzsong pushed a commit to branch master
in repository guix.

commit 059cab307fcacb5ee1c44c7ac7192ee6d5bfde4a
Author: Andy Patterson <address@hidden>
Date:   Sun Oct 2 22:41:33 2016 -0400

    gnu: Add cl-trivial-gray-streams.
    
    * gnu/packages/lisp.scm (cl-trivial-gray-streams)
    (sbcl-trivial-gray-streams, ecl-trivial-gray-streams): New variables.
    
    Signed-off-by: 宋文武 <address@hidden>
---
 gnu/packages/lisp.scm |   32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
index d9c1fa9..8f80b89 100644
--- a/gnu/packages/lisp.scm
+++ b/gnu/packages/lisp.scm
@@ -610,3 +610,35 @@ support.")
 
 (define-public ecl-bordeaux-threads
   (sbcl-package->ecl-package sbcl-bordeaux-threads))
+
+(define-public sbcl-trivial-gray-streams
+  (let ((revision "1")
+        (commit "0483ade330508b4b2edeabdb47d16ec9437ee1cb"))
+    (package
+      (name "sbcl-trivial-gray-streams")
+      (version (string-append "0.0.0-" revision "." (string-take commit 7)))
+      (source
+       (origin
+         (method git-fetch)
+         (uri
+          (git-reference
+           (url 
"https://github.com/trivial-gray-streams/trivial-gray-streams.git";)
+           (commit commit)))
+         (sha256
+          (base32 "0m3rpf2x0zmdk3nf1qfa01j6a55vj7gkwhyw78qslcgbjlgh8p4d"))
+         (file-name
+          (string-append "trivial-gray-streams-" version "-checkout"))))
+      (build-system asdf-build-system/sbcl)
+      (synopsis "Compatibility layer for Gray streams implementations")
+      (description "Gray streams is an interface proposed for inclusion with
+ANSI CL by David N. Gray.  The proposal did not make it into ANSI CL, but most
+popular CL implementations implement it.  This package provides an extremely
+thin compatibility layer for gray streams.")
+      (home-page "http://www.cliki.net/trivial-gray-streams";)
+      (license license:x11))))
+
+(define-public cl-trivial-gray-streams
+  (sbcl-package->cl-source-package sbcl-trivial-gray-streams))
+
+(define-public ecl-trivial-gray-streams
+  (sbcl-package->ecl-package sbcl-trivial-gray-streams))