Sharlatan Hellseher wrote 4 years ago
(address . guix-patches@gnu.org)
--
… наш разум - превосходная объяснительная машина которая способна
найти смысл почти в чем угодно, истолковать любой феномен, но
совершенно не в состоянии принять мысль о непредсказуемости.
From 5839891cddf3e85bf8971f49146080815811d0a4 Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Tue, 9 Feb 2021 23:00:06 +0000
Subject: [PATCH 1/4] gnu: Add fn
* gnu/packages/lisp-xyz.scm (sbcl-fn, cl-fn, ecl-fn): New variables
---
gnu/packages/lisp-xyz.scm | 31 +++++++++++++++++++++++++++++++
1 file changed, 31 insertions(+)
Toggle diff (44 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 9044261dad..ca0f55d536 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -1759,6 +1759,37 @@ Common Lisp.")
(define-public ecl-cl-fad
(sbcl-package->ecl-package sbcl-cl-fad))
+(define-public sbcl-fn
+ (let ((commit "8d8587d03a7b5e26b306fc90018e385d9e5acc2c")
+ (revision "1"))
+ (package
+ (name "sbcl-fn")
+ (version (git-version "0.0.0" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/cbaggers/fn")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "0yyp9z6iwx476whz0n1rpjznjyqqhlylhzwpgg5xx92lxmskl752"))))
+ (build-system asdf-build-system/sbcl)
+ (inputs
+ `(("named-readtables" ,sbcl-named-readtables)))
+ (home-page "https://github.com/cbaggers/fn")
+ (synopsis "Macros for lambda brevity")
+ (description
+ "Common Lisp lambda shorthand macros aiming to be used in cases where the
+word 'lambda and args are longer than the body of the lambda.")
+ (license license:public-domain))))
+
+(define-public ecl-fn
+ (sbcl-package->ecl-package sbcl-fn))
+
+(define-public cl-fn
+ (sbcl-package->cl-source-package sbcl-fn))
+
(define-public sbcl-rt
(let ((commit "a6a7503a0b47953bc7579c90f02a6dba1f6e4c5a")
(revision "1"))
--
2.30.0
From cd18cda659fc1d933e5720a846471b5db739735b Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Tue, 9 Feb 2021 23:08:35 +0000
Subject: [PATCH 4/4] gnu: Add varjo
* gnu/packages/lisp-xyz.scm (sbcl-varjo, cl-varjo, ecl-varjo): New variables
---
gnu/packages/lisp-xyz.scm | 40 +++++++++++++++++++++++++++++++++++++++
1 file changed, 40 insertions(+)
Toggle diff (53 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 5ca1cfa4c0..61f0d02a03 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -2681,6 +2681,46 @@ This package provides 3 systems: GLSL-SPEC GLSL-SYMBOLS GLSL-DOCS")
(define-public cl-glsl-spec
(sbcl-package->cl-source-package sbcl-glsl-spec))
+(define-public sbcl-varjo
+ (let ((commit "9e77f30220053155d2ef8870ceba157f75e538d4")
+ (revision "1"))
+ (package
+ (name "sbcl-varjo")
+ (version (git-version "0.0.0" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/cbaggers/varjo")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "1p9x1wj576x5d31yvls9r1avkjkyhri7kyxbjfkg9z93a1w18j9z"))))
+ (build-system asdf-build-system/sbcl)
+ (native-inputs
+ `(("fiveam" ,sbcl-fiveam)))
+ (inputs
+ `(("documentation-utils" ,sbcl-documentation-utils)
+ ("vas-string-metrics" ,sbcl-vas-string-metrics)
+ ("named-readtables" ,sbcl-named-readtables)
+ ("parse-float" ,sbcl-parse-float)
+ ("alexandria" ,sbcl-alexandria)
+ ("glsl-spec" ,sbcl-glsl-spec)
+ ("cl-ppcre" ,sbcl-cl-ppcre)
+ ("fn" ,sbcl-fn)))
+ (home-page "https://github.com/cbaggers/varjo")
+ (synopsis "Common Lisp to GLSL Language Translator")
+ (description
+ "Varjo is a Lisp to GLSL compiler. Varjo has no OpenGL dependency as is
+designed to be integrated into other projects.")
+ (license license:bsd-2))))
+
+(define-public ecl-varjo
+ (sbcl-package->ecl-package sbcl-varjo))
+
+(define-public cl-varjo
+ (sbcl-package->cl-source-package sbcl-varjo))
+
(define-public sbcl-cffi
(package
(name "sbcl-cffi")
--
2.30.0
From 5d10db5b91618c7322e27f26b670dc56de787b0d Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Tue, 9 Feb 2021 23:02:36 +0000
Subject: [PATCH 2/4] gnu: Add vas-string-metrics
* gnu/packages/lisp-xyz.scm
(vas-string-metrics, cl-vas-string-metrics, ecl-vas-string-metrics): New variables
---
gnu/packages/lisp-xyz.scm | 32 ++++++++++++++++++++++++++++++++
1 file changed, 32 insertions(+)
Toggle diff (45 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index ca0f55d536..6f00f44ae2 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -8208,6 +8208,38 @@ continuations of the @code{cl-cont} library.")
(define-public ecl-cl-coroutine
(sbcl-package->ecl-package sbcl-cl-coroutine))
+(define-public sbcl-vas-string-metrics
+ (let ((commit "f2e4500b180316123fbd549bd51c751ee2d6ba0f")
+ (revision "1"))
+ (package
+ (name "sbcl-vas-string-metrics")
+ (version (git-version "0.0.0" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/vsedach/vas-string-metrics")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "11fcnd03ybzz37rkg3z0wsb727yqgcd9gn70sccfb34l89ia279k"))))
+ (build-system asdf-build-system/sbcl)
+ (arguments
+ `(#:test-asd-file "test.vas-string-metrics.asd"))
+ (home-page "https://github.com/vsedach/vas-string-metrics")
+ (synopsis "Jaro-Winkler and Levenshtein string distance algorithms for Common Lisp")
+ (description
+ "VAS-STRING-METRICS provides the Jaro, Jaro-Winkler, Soerensen-Dice,
+Levenshtein, and normalized Levenshtein string distance/similarity metrics
+algorithms.")
+ (license license:lgpl3+))))
+
+(define-public ecl-vas-string-metrics
+ (sbcl-package->ecl-package sbcl-vas-string-metrics))
+
+(define-public cl-vas-string-metrics
+ (sbcl-package->cl-source-package sbcl-vas-string-metrics))
+
(define-public sbcl-vom
(let ((commit "1aeafeb5b74c53741b79497e0ef4acf85c92ff24")
(revision "1"))
--
2.30.0
From 588107b5e742cb2b5a3e128ce2613e988563566e Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Tue, 9 Feb 2021 23:06:33 +0000
Subject: [PATCH 3/4] gnu: Add glsl-spec
* gnu/packages/lisp-xyz.scm
(sbcl-glsl-spec, cl-glsl-spec, ecl-glsl-spec): New variables
---
gnu/packages/lisp-xyz.scm | 33 +++++++++++++++++++++++++++++++++
1 file changed, 33 insertions(+)
Toggle diff (46 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 6f00f44ae2..5ca1cfa4c0 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -2648,6 +2648,39 @@ non-consing thread safe queues and fibonacci priority queues.")
(define-public ecl-queues
(sbcl-package->ecl-package sbcl-queues))
+(define-public sbcl-glsl-spec
+ (let ((commit "f04476f7da89355ae6856b33283c60ba95c6555d")
+ (revision "1"))
+ (package
+ (name "sbcl-glsl-spec")
+ (version (git-version "0.0.0" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/cbaggers/glsl-spec")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "01ipspr22fgfj3w8wq2y81lzrjc4vpfiwnr3dqhjlpzzra46am8c"))))
+ (build-system asdf-build-system/sbcl)
+ (arguments
+ `(#:asd-systems '("glsl-spec" "glsl-symbols" "glsl-docs")))
+ (home-page "https://github.com/cbaggers/glsl-spec")
+ (synopsis "Common Lisp GLSL specification as a datastructure")
+ (description
+ "This package contains the specification of all functions and variables
+from GLSLL as data.
+
+This package provides 3 systems: GLSL-SPEC GLSL-SYMBOLS GLSL-DOCS")
+ (license #f))))
+
+(define-public ecl-glsl-spec
+ (sbcl-package->ecl-package sbcl-glsl-spec))
+
+(define-public cl-glsl-spec
+ (sbcl-package->cl-source-package sbcl-glsl-spec))
+
(define-public sbcl-cffi
(package
(name "sbcl-cffi")
--
2.30.0