Sharlatan Hellseher wrote 4 years ago
(address . guix-patches@gnu.org)
CAO+9K5owgFdHx-gy8tpJH65eBk9g3GoMkYDWpj6Djh1fCe2RaQ@mail.gmail.com
--
… наш разум - превосходная объяснительная машина которая способна
найти смысл почти в чем угодно, истолковать любой феномен, но
совершенно не в состоянии принять мысль о непредсказуемости.
From 03fdb8a2d96104ce8e411957b2a330580842e9cb Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Wed, 3 Feb 2021 00:04:33 +0000
Subject: [PATCH 3/5] gnu: Add golden-utils
* gnu/packages/lisp-xyz.scm
(sbcl-golden-utils, cl-golden-utils, ecl-golden-utils): New variables
---
gnu/packages/lisp-xyz.scm | 30 ++++++++++++++++++++++++++++++
1 file changed, 30 insertions(+)
Toggle diff (43 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 204c0ca0b6..e5f230214e 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -115,6 +115,36 @@ portable between implementations.")
(define-public ecl-alexandria
(sbcl-package->ecl-package sbcl-alexandria))
+(define-public sbcl-golden-utils
+ (let ((commit "9424419d867d5c2f819196ee41667a818a5058e7")
+ (revision "1"))
+ (package
+ (name "sbcl-golden-utils")
+ (version (git-version "0.0.0" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://git.mfiano.net/mfiano/golden-utils")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "15x0phm6820yj3h37ibi06gjyh6z45sd2nz2n8lcbfflwm086q0h"))))
+ (build-system asdf-build-system/sbcl)
+ (inputs
+ `(("alexandria" ,sbcl-alexandria)))
+ (home-page "https://git.mfiano.net/mfiano/golden-utils")
+ (synopsis "Common Lisp utility library")
+ (description
+ "This package provides 1 system: @code{GOLDEN-UTILS}")
+ (license license:expat))))
+
+(define-public ecl-golden-utils
+ (sbcl-package->ecl-package sbcl-golden-utils))
+
+(define-public cl-golden-utils
+ (sbcl-package->cl-source-package sbcl-golden-utils))
+
(define-public sbcl-asdf-finalizers
(let ((commit "7f537f6c598b662ae987c6acc268dd27c25977e0")
(revision "1"))
--
2.30.0
From 59340005503bd6c87a1b84a2ef610db4e654c747 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=23R=CE=BBatan?= <sharlatanus@gmail.com>
Date: Sat, 19 Dec 2020 16:37:55 +0000
Subject: [PATCH] Add new variables sbcl-qmynd cl-qmynd ecl-qmynd
---
gnu/packages/lisp-xyz.scm | 41 +++++++++++++++++++++++++++++++++++++++
1 file changed, 41 insertions(+)
Toggle diff (54 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 90e5193aba..4ac2712d5f 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -2314,6 +2314,47 @@ Lisp programs. It parses URI according to the RFC 2396 specification.")
(define-public ecl-puri
(sbcl-package->ecl-package sbcl-puri))
+(define-public sbcl-qmynd
+ (let ((commit "7e56daf73f0ed5f49a931c01af75fb874bcf3445")
+ (revision "1"))
+ (package
+ (name "sbcl-qmynd")
+ (version (git-version "1.0.0" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/qitab/qmynd")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32
+ "06gw5wxcpdclb6a5i5k9lbmdlyqsp182czrm9bm1cpklzbj0ihrl"))))
+ (build-system asdf-build-system/sbcl)
+ (inputs
+ `(("asdf-finalizers" ,sbcl-asdf-finalizers)
+ ("babel" ,sbcl-babel)
+ ("chipz" ,sbcl-chipz)
+ ("cl+ssl" ,sbcl-cl+ssl)
+ ("flexi-streams" ,sbcl-flexi-streams)
+ ("ironclad" ,sbcl-ironclad)
+ ("salza2" ,sbcl-salza2)
+ ("trivial-gray-streams" ,sbcl-trivial-gray-streams)
+ ("usocket" ,sbcl-usocket)))
+ (home-page "https://github.com/dimitri/cl-abnf")
+ (synopsis "QITAB MySQL Native Driver for Common Lisp")
+ (description "QMyND, the QITAB MySQL Native Driver, is a MySQL client
+library that directly talks to a MySQL server in its native network protocol.
+
+It's a part of QITAB umbrella project.")
+ (license license:expat ))))
+
+(define-public ecl-qmynd
+ (sbcl-package->ecl-package sbcl-qmynd))
+
+(define-public cl-qmynd
+ (sbcl-package->cl-source-package sbcl-qmynd))
+
(define-public sbcl-queues
(let ((commit "47d4da65e9ea20953b74aeeab7e89a831b66bc94"))
(package
--
2.26.2
From 7f457bc1b4f20d66644ecb9c8fda39cfc6a1b86d Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Wed, 3 Feb 2021 00:10:14 +0000
Subject: [PATCH 4/5] gnu: Add printv
* gnu/packages/lisp-xyz.scm
(sbcl-printv, cl-printv, ecl-printv): New variables
---
gnu/packages/lisp-xyz.scm | 30 ++++++++++++++++++++++++++++++
1 file changed, 30 insertions(+)
Toggle diff (43 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index e5f230214e..02fb92b9a3 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -4731,6 +4731,36 @@ various levels and mix text with expressions.")
(define-public ecl-log4cl
(sbcl-package->ecl-package sbcl-log4cl))
+(define-public sbcl-printv
+ (let ((commit "646d31978dbbb460fffb160fd65bb2be9a5a434e")
+ (revision "1"))
+ (package
+ (name "sbcl-printv")
+ (version (git-version "0.1.0" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/danlentz/printv")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "08jvy82abm7qi3wrxh6gvmwg9gy0zzhg4cfqajdwrggbah8mj5a6"))))
+ (build-system asdf-build-system/sbcl)
+ (home-page "https://github.com/danlentz/printv")
+ (synopsis "Common Lisp tracing and debug-logging macro")
+ (description
+ "@code{PRINTV} is a \"batteries-included\" tracing and debug-logging macro.
+
+This package provides 1 system: @code{PRINTV}")
+ (license license:asl2.0))))
+
+(define-public ecl-printv
+ (sbcl-package->ecl-package sbcl-printv))
+
+(define-public cl-printv
+ (sbcl-package->cl-source-package sbcl-printv))
+
(define-public sbcl-verbose
(let ((commit "c5b7ecd465be61b35af17ef57564697b88397174")
(revision "1"))
--
2.30.0
From 7bd0146ec173560efe80a9c64646766a13982ae5 Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Tue, 2 Feb 2021 23:58:57 +0000
Subject: [PATCH 2/5] gnu: Add cl-slug
* gnu/packages/lisp-xyz.scm
(sbcl-cl-slug, cl-slug, ecl-cl-slug): New variables
---
gnu/packages/lisp-xyz.scm | 37 +++++++++++++++++++++++++++++++++++++
1 file changed, 37 insertions(+)
Toggle diff (50 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 7957b50490..204c0ca0b6 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -6650,6 +6650,43 @@ of C+GObject libraries without the need of writing dedicated bindings.")
(define-public ecl-cl-gobject-introspection
(sbcl-package->ecl-package sbcl-cl-gobject-introspection))
+(define-public sbcl-cl-slug
+ (let ((commit "ffb229d10f0d3f7f54e706791725225e200bf749")
+ (revision "1"))
+ (package
+ (name "sbcl-cl-slug")
+ (version (git-version "0.4.1" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/EuAndreh/cl-slug")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "1asdq6xllmsvfw5fky9wblqcx9isac9jrrlkfl7vyxcq1wxrnflx"))))
+ (build-system asdf-build-system/sbcl)
+ (arguments
+ `(#:asd-files '("cl-slug-test.asd" "cl-slug.asd")
+ #:asd-systems '("cl-slug-test" "cl-slug")))
+ (native-inputs
+ `(("prove" ,sbcl-prove)))
+ (inputs
+ `(("ppcre" ,sbcl-cl-ppcre)))
+ (home-page "https://github.com/EuAndreh/cl-slug")
+ (synopsis "Multy languages slag formater")
+ (description
+ "Small library to make slugs, mainly for URIs, from english and beyond.
+
+This package provides 1 system: @code{CL-SLUG}")
+ (license license:expat))))
+
+(define-public ecl-cl-slug
+ (sbcl-package->ecl-package sbcl-cl-slug))
+
+(define-public cl-slug
+ (sbcl-package->cl-source-package sbcl-cl-slug))
+
(define-public sbcl-string-case
(let ((commit "718c761e33749e297cd2809c7ba3ade1985c49f7")
(revision "0"))
--
2.30.0
From 551eb58e20791838e783136dbaadd2269fd6a04e Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Wed, 3 Feb 2021 00:15:10 +0000
Subject: [PATCH 5/5] gnu: Add trivial-timeout
* gnu/packages/lisp-xyz.scm
(sbcl-trivial-timeout, cl-trivial-timeout, ecl-trivial-timeout): New variables
---
gnu/packages/lisp-xyz.scm | 34 ++++++++++++++++++++++++++++++++++
1 file changed, 34 insertions(+)
Toggle diff (47 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 02fb92b9a3..908985865d 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -278,6 +278,40 @@ interactive development model in mind.")
(define-public ecl-fiveam
(sbcl-package->ecl-package sbcl-fiveam))
+(define-public sbcl-trivial-timeout
+ (let ((commit "feb869357f40f5e109570fb40abad215fb370c6c")
+ (revision "1"))
+ (package
+ (name "sbcl-trivial-timeout")
+ (version (git-version "0.1.5" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/gwkkwg/trivial-timeout/")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "1kninxwvvih9nhh7a9y8lfgi7pdr76675y1clw4ss17vz8fbim5p"))))
+ (build-system asdf-build-system/sbcl)
+ (arguments
+ ;; NOTE: (Sharlatan-20210202T231437+0000): Due to the age of this library
+ ;; tests use some deprecated functionality and keep failing.
+ `(#:tests? #f))
+ (home-page "https://github.com/gwkkwg/trivial-timeout/")
+ (synopsis "OS and Implementation independent access to timeouts")
+ (description
+ "Portable and possibly dangerous timeout library for Common Lisp.
+
+This package provides 1 system: @code{TRIVIAL-TIMEOUT}")
+ (license license:expat))))
+
+(define-public ecl-trivial-timeout
+ (sbcl-package->ecl-package sbcl-trivial-timeout))
+
+(define-public cl-trivial-timeout
+ (sbcl-package->cl-source-package sbcl-trivial-timeout))
+
(define-public sbcl-bordeaux-threads
(package
(name "sbcl-bordeaux-threads")
--
2.30.0
From 5a0af950e39153e12f970ca5fcc6e3edcdbdd0cb Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Tue, 2 Feb 2021 23:52:03 +0000
Subject: [PATCH 1/5] gnu: Add 3b-bmfont
* gnu/package/lisp-xyz.scm
(sbcl-3b-bmfont, cl-3b-bmfont, ecl-3b-bmfont): New variables
---
gnu/packages/lisp-xyz.scm | 45 +++++++++++++++++++++++++++++++++++++++
1 file changed, 45 insertions(+)
Toggle diff (58 lines)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 736dbfca37..7957b50490 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -8615,6 +8615,51 @@ respectively.")
(define-public ecl-png-read
(sbcl-package->ecl-package sbcl-png-read))
+(define-public sbcl-3b-bmfont
+ (let ((commit "d1b5bec0de580c2d08ec947a93c56b1400f2a37a")
+ (revision "1"))
+ (package
+ (name "sbcl-3b-bmfont")
+ (version (git-version "0.0.1" revision commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/3b/3b-bmfont/")
+ (commit commit)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "12sgf7m0h6fqzhvkas7vmci6mprj3j3fnz778jlbqbsydln6v2yc"))))
+ (build-system asdf-build-system/sbcl)
+ (arguments
+ `(#:asd-systems
+ '("3b-bmfont"
+ "3b-bmfont/text"
+ "3b-bmfont/common"
+ "3b-bmfont/xml"
+ "3b-bmfont/json")))
+ (inputs
+ `(("flexi-streams" ,sbcl-flexi-streams)
+ ("alexandria" ,sbcl-alexandria)
+ ("cxml" ,sbcl-cxml)
+ ("jsown" ,sbcl-jsown)
+ ("split-sequence" ,sbcl-split-sequence)))
+ (home-page "https://github.com/3b/3b-bmfont/")
+ (synopsis "Read/write bmfont metadata files")
+ (description
+ "Common Lisp library which provides functionality to Read/Write Bit Map
+Font (BMF) into text, JSON and XML.
+
+This package provides 5 systems: @code{3B-BMFONT} @code{3B-BMFONT/TEXT}
+@code{3B-BMFONT/COMMON} @code{3B-BMFONT/XML} @code{3B-BMFONT/JSON}")
+ (license license:expat))))
+
+(define-public ecl-3b-bmfont
+ (sbcl-package->ecl-package sbcl-3b-bmfont))
+
+(define-public cl-3b-bmfont
+ (sbcl-package->cl-source-package sbcl-3b-bmfont))
+
(define-public sbcl-zpng
(package
(name "sbcl-zpng")
--
2.30.0