@@ -2,6 +2,7 @@
;;; Copyright © 2020 Ekaitz Zarraga <ekaitz@elenq.tech>
;;; Copyright © 2020 Evan Hanson <evhan@foldling.org>
;;; Copyright © 2020 raingloom <raingloom@riseup.net>
+;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -281,3 +282,25 @@ with integers.")
"This package provides a simple testing utility for CHICKEN Scheme.")
(license license:bsd-3)))
+
+(define-public chicken-matchable
+ (package
+ (name "chicken-matchable")
+ (version "1.1")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append
+ "https://code.call-cc.org/egg-tarballs/5/matchable/matchable-"
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "0bizkac4a926lbk0v2m05ysq359mzhfsqh973m72jc4gcj4azr5p"))))
+ (build-system chicken-build-system)
+ (arguments `(#:egg-name "matchable"))
+ (native-inputs `(("chicken-test" ,chicken-test)))
+ (home-page "https://wiki.call-cc.org/egg/matchable")
+ (synopsis "Hygienic MATCH replacement")
+ (description "This package implements Andrew Wright's pattern matching
+macros in CHICKEN.")
+ (license license:public-domain)))