diff options
Diffstat (limited to 'gnu/packages/lisp-xyz.scm')
| -rw-r--r-- | gnu/packages/lisp-xyz.scm | 1502 |
1 files changed, 1296 insertions, 206 deletions
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index 83e408b972..8a8b36e455 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -47,6 +47,7 @@ ;;; Copyright © 2024 Grigory Shepelev <shegeley@gmail.com> ;;; Copyright © 2025 Junker <dk@junkeria.club> ;;; Copyright © 2025 Simen Endsjø <contact@simendsjo.me> +;;; Copyright © 2025 Ashish SHUKLA <ashish.is@lostca.se> ;;; ;;; This file is part of GNU Guix. ;;; @@ -528,11 +529,11 @@ offers them both in non-modifying and modifying versions where applicable.") (sbcl-package->clasp-package sbcl-3d-vectors)) (define-public sbcl-40ants-asdf-system - (let ((commit "492bc9b09c100593ceec8375899addcbffa573cc") - (revision "0")) + (let ((commit "91ed8a4430552f58563d84182b97b25e9e1e8dbe") + (revision "1")) (package (name "sbcl-40ants-asdf-system") - (version (git-version "0.0.0" revision commit)) + (version (git-version "0.3.2" revision commit)) (source (origin (method git-fetch) @@ -540,7 +541,7 @@ offers them both in non-modifying and modifying versions where applicable.") (url "https://github.com/40ants/40ants-asdf-system") (commit commit))) (sha256 - (base32 "151zfyz7c4xrd4mnyzd5nsla1p70q4iixgm9mlnbm799mr1aprwp")) + (base32 "0wi575m0s0a9fvp1wy5ga760f71la16z1633qk6s2f87rwcjs8kw")) (file-name (git-file-name "cl-40ants-asdf-system" version)))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-rove)) @@ -558,63 +559,46 @@ offers them both in non-modifying and modifying versions where applicable.") (sbcl-package->ecl-package sbcl-40ants-asdf-system)) (define-public sbcl-40ants-doc - (let ((commit "7725ff67a380e9ebfc6155e14d91e650f256711b") - (revision "0")) - (package - (name "sbcl-40ants-doc") - (version (git-version "0.1.0" revision commit)) - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/40ants/doc") - (commit commit))) - (sha256 - (base32 "1v6gnhrk02vsixmprzk4wvvj7vh11vp5waxyih0qz2ih8d38r5pg")) - (file-name (git-file-name "cl-40ants-doc" version)))) - (build-system asdf-build-system/sbcl) - (arguments - ;; TODO: Add remaining dependencies of 40ants-doc-full and - ;; 40ants-doc-test missing from Guix. - '(#:asd-systems '("40ants-doc" - ;;"40ants-doc-full" - ) - #:tests? #f)) - ;;(native-inputs - ;; (list sbcl-rove)) - (inputs - (list sbcl-named-readtables - sbcl-pythonic-string-reader - ;; For 40ants-doc-full: - ;;sbcl-3bmd - ;;sbcl-alexandria - ;;sbcl-babel - ;;sbcl-cl-cookie - ;;sbcl-cl-fad - ;;sbcl-cl-ppcre - ;;sbcl-common-doc ; Missing from Guix - ;;sbcl-common-html ; Missing from Guix - ;;sbcl-commondoc-markdown ; Missing from Guix - ;;sbcl-dexador - ;;sbcl-docs-builder ; Missing from Guix - ;;sbcl-fare-utils - ;;sbcl-jonathan - ;;sbcl-lass - ;;sbcl-local-time - ;;sbcl-log4cl - ;;sbcl-slime-swank - ;;sbcl-slynk - ;;sbcl-spinneret - ;;sbcl-stem ; Missing from Guix; also, license is unconfirmed - ;;sbcl-str - ;;sbcl-tmpdir ; Missing from Guix - ;;sbcl-trivial-extract ; Missing from Guix - ;;sbcl-xml-emitter - )) - (home-page "https://40ants.com/doc/") - (synopsis "Exploratory programming environment and documentation generator") - (description - "@code{40ants-doc} provides a rudimentary explorable programming + (package + (name "sbcl-40ants-doc") + (version "0.24.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/40ants/doc") + (commit (string-append "v" version)))) + (sha256 + (base32 "04hhf16ylv417xz2jvf6s0ybbv0pwjscarvqnpbn8by4wmchvkjl")) + (file-name (git-file-name "cl-40ants-doc" version)))) + (build-system asdf-build-system/sbcl) + (arguments + '(#:asd-systems '("40ants-doc" + "40ants-doc-full"))) + (inputs + (list sbcl-cl-fad + sbcl-cl-str + sbcl-commondoc-markdown + sbcl-dexador + sbcl-docs-config + sbcl-jonathan + sbcl-lass + sbcl-log4cl + sbcl-named-readtables + sbcl-pythonic-string-reader + sbcl-rove + sbcl-serapeum + sbcl-slime-swank + sbcl-slynk + sbcl-spinneret + sbcl-stem + sbcl-tmpdir + sbcl-which + sbcl-xml-emitter)) + (home-page "https://40ants.com/doc/") + (synopsis "Exploratory programming environment and documentation generator") + (description + "@code{40ants-doc} provides a rudimentary explorable programming environment. The narrative primarily lives in so-called sections that mix Markdown docstrings with references to functions, variables, etc., all of which should probably have their own docstrings. @@ -632,7 +616,7 @@ look pretty, documentation is code. @code{40ants-doc} is a fork of MGL-PAX with fewer dependencies (only @code{named-readtables} and @code{pythonic-string-reader}) for the core system, and additional features in the full system.") - (license license:expat)))) + (license license:expat))) (define-public cl-40ants-doc (sbcl-package->cl-source-package sbcl-40ants-doc)) @@ -856,6 +840,45 @@ functions allow Lisp programs to explore the web.") (define-public cl-acl-compat (sbcl-package->cl-source-package sbcl-acl-compat)) +(define-public sbcl-common-macros + (let ((commit "f261a4a07c52e5c560d90154393bd49421ece740") + (revision "0")) + (package + (name "sbcl-common-macros") + (version (git-version "0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/robert-strandh/Common-macros") + (commit commit))) + (file-name (git-file-name "cl-common-macros" version)) + (sha256 + (base32 + "0rn0rnccjgxsrf828bw740vs8psjjxb5x4hmk8rnqiz5p3y0lvph")))) + (build-system asdf-build-system/sbcl) + (arguments + '(#:asd-systems '("common-macro-definitions"))) + (inputs + (list sbcl-ecclesia)) + (home-page "https://github.com/robert-strandh/Common-macros") + (synopsis "Portable Common Lisp macro definitions") + (description + "This library defines most Common Lisp standard macros that can be +defined in a portable way and that can generate portable code. Some of these +macros may not be good enough as the final version for a typical +implementation, but they will work.") + (license license:bsd-2)))) + +(define-public cl-common-macros + (sbcl-package->cl-source-package sbcl-common-macros)) + +(define-public ecl-common-macros + (sbcl-package->ecl-package sbcl-common-macros)) + +(define-public clasp-common-macros + (sbcl-package->clasp-package sbcl-common-macros)) + (define-public sbcl-adopt (package (name "sbcl-adopt") @@ -1527,21 +1550,21 @@ Common Lisp arrays and performing numerical calculations with them.") (sbcl-package->ecl-package sbcl-array-operations)) (define-public sbcl-array-utils - (let ((commit "29da8fccf6093fe8f8c7b2daef7de1a428ef1834") - (revision "0")) + (let ((commit "16e108a516a1e6662adaa59f05841b8d251c250f") + (revision "1")) (package (name "sbcl-array-utils") - (version (git-version "1.2.0" revision commit)) + (version (git-version "1.3.0" revision commit)) (source (origin (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/array-utils") + (url "https://codeberg.org/shinmera/array-utils") (commit commit))) (file-name (git-file-name "cl-array-utils" version)) (sha256 - (base32 "1d66s2inb9hpw27hdb20x27dychmpn1mn35v0mlsib848qdz87az")))) + (base32 "0xacdjirb4bkszilmyyg7fzinka71f14z30nz2jwi7a88b8lxk1g")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-parachute)) @@ -1551,7 +1574,7 @@ Common Lisp arrays and performing numerical calculations with them.") (description "A miniature toolkit that contains some useful shifting/popping/pushing functions for arrays and vectors. Originally from Plump.") - (home-page "https://shinmera.github.io/array-utils/") + (home-page "https://shinmera.com/docs/array-utils") (license license:zlib)))) (define-public cl-array-utils @@ -1925,8 +1948,8 @@ synchronization latency.") (define-public sbcl-atomics ;; No release in years. - (let ((commit "b7477024894e322bff9c85e6d81e5e8d1d4eae59") - (revision "2")) + (let ((commit "5b36bf251fee2f80e34cbf6802c9eb08ce3675f6") + (revision "3")) (package (name "sbcl-atomics") (version (git-version "1.0.0" revision commit)) @@ -1934,17 +1957,17 @@ synchronization latency.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/atomics") + (url "https://codeberg.org/shinmera/atomics") (commit commit))) (file-name (git-file-name "cl-atomics" version)) (sha256 - (base32 "1ah6fgvfva0axnhj4sp1qy6gjyw41fkhpnv998di0wbp6hls8j39")))) + (base32 "0lmrqn2yzrs1qxd0asjpwk50hdcp2hkkbcpzc4lkm3xbxnwxrwg2")))) (build-system asdf-build-system/sbcl) (inputs (list sbcl-documentation-utils)) (native-inputs (list sbcl-parachute)) - (home-page "https://shinmera.github.io/atomics/") + (home-page "https://shinmera.com/docs/atomics") (synopsis "Common Lisp portability layer for atomic operations") (description "This is a library for access to atomic operation primitives such as @@ -2310,6 +2333,36 @@ for Common Lisp.") ;; (define-public ecl-bknr-datastore ;; (sbcl-package->ecl-package sbcl-bknr-datastore)) +(define-public sbcl-black-tie + (let ((commit "26381ca1b1d6846cfa2ad662da37302d30e24a97") + (revision "0")) + (package + (name "sbcl-black-tie") + (version (git-version "0.2" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://codeberg.org/aerique/black-tie") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0a1zczxp4wkqs4cmwc4rnsgwwc2h4zqmg58cjykfzz4jh31fa43a")))) + (build-system asdf-build-system/sbcl) + (home-page "https://codeberg.org/aerique/black-tie") + (synopsis "Noise library for Common Lisp") + (description "This package provides a noise library for Common Lisp.") + (license license:bsd-3)))) + +(define-public ecl-black-tie + (sbcl-package->ecl-package sbcl-black-tie)) + +(define-public cl-black-tie + (sbcl-package->cl-source-package sbcl-black-tie)) + +(define-public clasp-black-tie + (sbcl-package->clasp-package sbcl-black-tie)) + (define-public sbcl-blackbird (let ((commit "d361f81c1411dec07f6c2dcb11c78f7aea9aaca8") (revision "1")) @@ -2854,7 +2907,9 @@ cartesian product.") ((".*\"PyParser_SimpleParseStringFlagsFilename\".*") "") ((".*\"PyParser_SimpleParseFile\".*") "") ((".*\"PyParser_SimpleParseFileFlags\".*") "") - ((".*\"PyLong_FromUnicode\".*") ""))))))) + ((".*\"PyLong_FromUnicode\".*") "") + ((".*\"PyUnicodeEncodeError_Create\".*") "") + ((".*\"PyUnicodeTranslateError_Create\".*") ""))))))) (native-inputs (list sbcl-cl-fad sbcl-lift sbcl-cl-quickcheck)) (inputs @@ -3031,8 +3086,8 @@ Lisp.") (sbcl-package->ecl-package sbcl-calm)) (define-public sbcl-cambl - (let ((commit "7016d1a98215f82605d1c158e7a16504ca1f4636") - (revision "1")) + (let ((commit "c21b8afe8869401d618efc9f0ef406a28d89c3b7") + (revision "2")) (package (name "sbcl-cambl") (version (git-version "4.0.0" revision commit)) @@ -3042,17 +3097,17 @@ Lisp.") (uri (git-reference (url "https://github.com/jwiegley/cambl") (commit commit))) - (file-name (git-file-name "cambl" version)) + (file-name (git-file-name "cl-cambl" version)) (sha256 - (base32 "103mry04j2k9vznsxm7wcvccgxkil92cdrv52miwcmxl8daa4jiz")))) + (base32 "1jp0i0pwdvzg689wx2rhm2ajm4w8b55rw6q6jas3498myy2gif4d")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-xlunit)) (inputs - `(("alexandria" ,sbcl-alexandria) - ("cl-containers" ,sbcl-cl-containers) - ("local-time" ,sbcl-local-time) - ("periods" ,sbcl-periods))) + (list sbcl-alexandria + sbcl-cl-containers + sbcl-local-time + sbcl-periods)) (synopsis "Commoditized amounts and balances for Common Lisp") (description "CAMBL is a Common Lisp library providing a convenient facility for @@ -3504,6 +3559,74 @@ package.") (define-public ecl-cffi-c-ref (sbcl-package->ecl-package sbcl-cffi-c-ref)) +(define-public sbcl-cffi-object + (package + (name "sbcl-cffi-object") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/bohonghuang/cffi-object") + (commit "b9e4f8f7eed44cfa5319fd086f282efbcf3ed705"))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1mvxqaq800803mhhra28kjzvkcg7b9jfnlw7662qnps99b0m8y2p")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-parachute + sbcl-cffi-ops)) + (inputs + (list sbcl-alexandria + sbcl-cffi + sbcl-trivial-garbage)) + (home-page "https://github.com/bohonghuang/cffi-object") + (synopsis "Enables fast and convenient interoperation with foreign +objects") + (description "Enables fast and convenient interoperation with foreign +objects.") + (license license:asl2.0))) + +;; Error detected: +;; Unknown CFFI type :OBJECT +#;(define-public ecl-cffi-object + (sbcl-package->ecl-package sbcl-cffi-object)) + +(define-public cl-cffi-object + (sbcl-package->cl-source-package sbcl-cffi-object)) + +(define-public sbcl-cffi-ops + (package + (name "sbcl-cffi-ops") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/bohonghuang/cffi-ops") + (commit "79a36a643c10459e3ea6a7a22dfa7f9b62233e61"))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0hi3svwfb7m1wq892wlrsgj52jkh3x6msnimax28221baj6g64gg")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-parachute)) + (inputs + (list sbcl-alexandria + sbcl-cffi + sbcl-arrow-macros + sbcl-trivial-macroexpand-all)) + (home-page "https://github.com/bohonghuang/cffi-ops") + (synopsis "Helps writing concise CFFI-related code") + (description "Helps writing concise CFFI-related code.") + (license license:asl2.0))) + +(define-public ecl-cffi-ops + (sbcl-package->ecl-package sbcl-cffi-ops)) + +(define-public cl-cffi-ops + (sbcl-package->cl-source-package sbcl-cffi-ops)) + (define-public sbcl-chanl (let ((commit "56e90a126c78b39bb621a01585e8d3b985238e8c") (revision "1")) @@ -3579,7 +3702,7 @@ initialization methods.") (define-public sbcl-charje.loop (package (name "sbcl-charje.loop") - (version "1.0.0") + (version "1.0.1") (source (origin (method git-fetch) @@ -3589,28 +3712,29 @@ initialization methods.") (file-name (git-file-name "cl-charje.loop" version)) (sha256 (base32 - "07cyfs4qasrp376304aiavg318pmb4wvnk7ny7fggddd6imaw6k5")))) + "0gp4v2awlrrqpvf2hamp51590flfin212dfccqjjxdhf4hkm8450")))) (build-system asdf-build-system/sbcl) (inputs (list sbcl-alexandria sbcl-binding-arrows - sbcl-cl-environments sbcl-parse-declarations)) (home-page "https://git.sr.ht/~charje/loop") (synopsis "Loop abstraction for Common Lisp that is consistent for different kinds of data") - (description "Loop is a joy to use and has a consistent interface unlike -other looping abstractions and ANSI list operations. You can define your own -iterators and aggregators that integrate tightly into other operations. All -operations are non-consing when possible.") + (description "Loop has a consistent interface unlike other looping +abstractions and ANSI list operations. You can define your own efters and +gatherers that integrate tightly into other operations. All operations are +non-consing when possible.") (license license:agpl3+))) (define-public cl-charje.loop (sbcl-package->cl-source-package sbcl-charje.loop)) -;; TODO: ECL is not currently supported. -;; (define-public ecl-charje.loop -;; (sbcl-package->ecl-package sbcl-charje.loop)) +(define-public ecl-charje.loop + (sbcl-package->ecl-package sbcl-charje.loop)) + +(define-public clasp-charje.loop + (sbcl-package->clasp-package sbcl-charje.loop)) (define-public sbcl-chemboy (package @@ -4545,8 +4669,8 @@ execution mechanism for Common Lisp."))) (sbcl-package->ecl-package sbcl-async-process)) (define-public sbcl-cl-autowrap - (let ((revision "2") - (commit "a5d71ebd7c21b87f449db1e16ab815750d7c0ea4")) + (let ((revision "3") + (commit "4bba9e37b59cd191dea150a89aef7245a40b1c9d")) ;; no tagged branches (package (name "sbcl-cl-autowrap") @@ -4559,17 +4683,25 @@ execution mechanism for Common Lisp."))) (commit commit))) (file-name (git-file-name "cl-autowrap" version)) (sha256 - (base32 "0795c817m1c41cz3ywzzg83z4pgkxdg6si553pay9mdgjvmrwmaw")))) + (base32 "1sfvhyrwm9dhxi0y42xp7mx8mvs6lmq3bzxdx34frxni5srcgly0")))) (build-system asdf-build-system/sbcl) - (arguments - `(#:asd-systems '("cl-plus-c" "cl-autowrap"))) (inputs - `(("alexandria" ,sbcl-alexandria) - ("cffi" ,sbcl-cffi) - ("cl-json" ,sbcl-cl-json) - ("cl-ppcre" ,sbcl-cl-ppcre) - ("defpackage-plus" ,sbcl-defpackage-plus) - ("trivial-features" ,sbcl-trivial-features))) + (list libffi + sbcl-alexandria + sbcl-cffi + sbcl-cl-json + sbcl-cl-ppcre + sbcl-defpackage-plus + sbcl-trivial-features)) + (arguments + (list #:asd-systems ''("cl-autowrap" "cl-plus-c" "cl-autowrap/libffi") + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'fix-paths + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "autowrap-libffi/library.lisp" + (("libffi.so") + (search-input-file inputs "lib/libffi.so")))))))) (home-page "https://github.com/rpav/cl-autowrap") (synopsis "FFI wrapper generator for Common Lisp") (description "This is a c2ffi-based wrapper generator for Common Lisp.") @@ -4977,11 +5109,11 @@ higher-level lispier interface.") (sbcl-package->ecl-package sbcl-cl-charms)) (define-public sbcl-cl-collider - (let ((commit "a46908896982868955b29bfb3a5337a0af489b0b") - (revision "0")) + (let ((commit "7e0ebb0756dda0a34401abafcd5ee22e043ce4c4") + (revision "1")) (package (name "sbcl-cl-collider") - (version (git-version "2018.7.15" revision commit)) + (version (git-version "2025-08-18" revision commit)) (source (origin (method git-fetch) @@ -4990,7 +5122,7 @@ higher-level lispier interface.") (commit commit))) (file-name (git-file-name "cl-collider" version)) (sha256 - (base32 "10wvjbwvbgr0b57hpfxycg90yjmb29pirygr1sxrdaqxll328sz1")))) + (base32 "19i8fn7l5gm9k0ypb9kpn919hv86swdq2426vg4vb2r13h49b6vm")))) (build-system asdf-build-system/sbcl) (arguments (list #:phases @@ -5001,9 +5133,6 @@ higher-level lispier interface.") (("/usr/local/lib/SuperCollider/plugins") (search-input-directory inputs "/lib/SuperCollider/plugins")) - (("/usr/local/share/SuperCollider/Extensions") - (search-input-directory - inputs "/share/SuperCollider/Extensions")) (("which scsynth") (string-append "which " @@ -5077,6 +5206,38 @@ This library is no longer supported by its author.") (define-public ecl-cl-colors (sbcl-package->ecl-package sbcl-cl-colors)) +(define-public sbcl-cl-colors-ng + (package + (name "sbcl-cl-colors-ng") + (version "0.0.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://codeberg.org/cage/cl-colors-ng.git") + (commit "310e6495e2658d33a7500455fd461074748ef805"))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0lnrawzygxzb9yp1bsjwwlyyp0axms5f5rv0aa4nlhxh5syv5fg8")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-clunit2)) + (inputs + (list sbcl-alexandria + sbcl-cl-ppcre + sbcl-parse-number)) + (synopsis "Simple color library for Common Lisp") + (description "Simple color library for Common Lisp.") + (license license:boost1.0) + (home-page "https://codeberg.org/cage/cl-colors-ng.git"))) + +(define-public ecl-cl-colors-ng + (sbcl-package->ecl-package sbcl-cl-colors-ng)) + +(define-public cl-colors-ng + (sbcl-package->cl-source-package sbcl-cl-colors-ng)) + (define-public sbcl-cl-colors2 (package (name "sbcl-cl-colors2") @@ -5465,8 +5626,8 @@ from/to strings, streams and files.") (sbcl-package->ecl-package sbcl-cl-csv)) (define-public sbcl-cl-data-structures - (let ((commit "ffab56830f3ed777450a065890484ef22147cd44") - (revision "2")) + (let ((commit "d11e589a3ddc6c32fcbd8be7e9f8e3471bc4d5dd") + (revision "3")) (package (name "sbcl-cl-data-structures") (version (git-version "1.4.1" revision commit)) @@ -5478,7 +5639,7 @@ from/to strings, streams and files.") (commit commit))) (file-name (git-file-name "cl-data-structures" version)) (sha256 - (base32 "0h49h1x9dgr53imj0r4lgx0zvdsv3mnh7lyayzy9hlysy2ixp425")))) + (base32 "12pdk3634nz51z4x2gly06h2j8bykqwxwfadsyq7r4ybzs3z8d73")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-prove)) @@ -6736,6 +6897,42 @@ Common Lisp based on the hash array-mapped trie data structure.") (define-public ecl-cl-hamt (sbcl-package->ecl-package sbcl-cl-hamt)) +(define-public sbcl-cl-hash-util + (let ((commit "7f88cb7579b2af8c21022554f46dddd6ce6a5fc2") + (revision "0")) + (package + (name "sbcl-cl-hash-util") + (version (git-version "0.1.7" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/orthecreedence/cl-hash-util") + (commit commit))) + (file-name (git-file-name name commit)) + (sha256 + (base32 "1xab7v2mav241rs8w68qmg485g4f75nrac3hjcnm0cb19ickbs1m")))) + (build-system asdf-build-system/sbcl) + (arguments + (list + #:asd-systems ''("cl-hash-util"))) + (native-inputs + (list sbcl-fiveam)) + (inputs + (list)) + (home-page "https://github.com/orthecreedence/cl-hash-util") + (synopsis "Small hash utility library for Common Lisp") + (description "Very basic library for dealing with CL's hash tables. The +idea was spawned through working with enough JSON APIs and config files, causing +a lot of headaches in the process.") + (license license:expat)))) + +(define-public ecl-cl-hash-util + (sbcl-package->ecl-package sbcl-cl-hash-util)) + +(define-public cl-hash-util + (sbcl-package->cl-source-package sbcl-cl-hash-util)) + (define-public sbcl-cl-heap (package (name "sbcl-cl-heap") @@ -7431,8 +7628,8 @@ as possible).") (sbcl-package->ecl-package sbcl-cl-json-pointer)) (define-public sbcl-cl-ledger - (let ((commit "08e0be41795e804cd36142e51756ad0b1caa377b") - (revision "1")) + (let ((commit "b0174f5634e389fb022ae72cc527a13b719655bd") + (revision "2")) (package (name "sbcl-cl-ledger") (version (git-version "4.0.0" revision commit)) @@ -7442,26 +7639,24 @@ as possible).") (uri (git-reference (url "https://github.com/ledger/cl-ledger") (commit commit))) - (file-name (git-file-name name version)) + (file-name (git-file-name "cl-ledger" version)) (sha256 - (base32 - "1via0qf6wjcyxnfbmfxjvms0ik9j8rqbifgpmnhrzvkhrq9pv8h1")))) + (base32 "02zg53j8d7lpyafif9kplp6clchz4id429j0dc5w80wvcwfal123")))) (build-system asdf-build-system/sbcl) (inputs - `(("cambl" ,sbcl-cambl) - ("cl-ppcre" ,sbcl-cl-ppcre) - ("local-time" ,sbcl-local-time) - ("periods" ,sbcl-periods))) + (list sbcl-cambl + sbcl-cl-ppcre + sbcl-local-time + sbcl-periods)) (arguments - '(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'fix-system-definition - (lambda _ - (substitute* "cl-ledger.asd" - ((" :build-operation program-op") "") - ((" :build-pathname \"cl-ledger\"") "") - ((" :entry-point \"ledger::main\"") "")) - #t))))) + (list #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'fix-system-definition + (lambda _ + (substitute* "cl-ledger.asd" + ((" :build-operation program-op") "") + ((" :build-pathname \"cl-ledger\"") "") + ((" :entry-point \"ledger::main\"") ""))))))) (synopsis "Common Lisp port of the Ledger accounting system") (description "CL-Ledger is a Common Lisp port of the Ledger double-entry accounting @@ -8110,8 +8305,10 @@ of http://code.google.com/p/mimeparse/, with a Common Lisp flavor.") (sbcl-package->clasp-package sbcl-cl-mimeparse)) (define-public sbcl-cl-mixed - (let ((commit "4aaff134d3902d93a2a8605c10de4bcfc62d7afa") - (revision "0")) + ;; There are no releases, but this commit is entitled + ;; "Bump to libmixed-2.4.0". + (let ((commit "3da661ae199be94f822e3f9ef6bf03bc6456652b") + (revision "1")) (package (name "sbcl-cl-mixed") (version (git-version "2.1.0" revision commit)) @@ -8123,7 +8320,7 @@ of http://code.google.com/p/mimeparse/, with a Common Lisp flavor.") (commit commit))) (file-name (git-file-name "cl-mixed" version)) (sha256 - (base32 "1mrj95lxb1gbxxm89x8gy1ifw2ic1p5wwpapkxcd2jr8abw7zny0")) + (base32 "0i7bb2b3a9i4kgp7dzzs5211xj56zzcpwkjlfxpslfp7iz0685y0")) (modules '((guix build utils))) (snippet ;; Delete bundled libraries. @@ -9520,6 +9717,8 @@ previous commands.") (url "https://github.com/vseloved/cl-redis") (commit commit))) (file-name (git-file-name "cl-redis" version)) + ;; https://github.com/vseloved/cl-redis/pull/42 + (patches (search-patches "sbcl-cl-redis-replace-sbcl-specific-calls.patch")) (sha256 (base32 "1jb82zpiwx7ri86z0xqdynr3m40jnlzinyc0b47lvpbqs7cydrrg")))) (build-system asdf-build-system/sbcl) @@ -11495,6 +11694,72 @@ and lean bindings to C libraries.") (define-public ecl-claw (sbcl-package->ecl-package sbcl-claw)) +(define-public sbcl-claw-raylib + (package + (name "sbcl-claw-raylib") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + ;; The prebuild branch of the original repository is reset when + ;; there are changes. We use a fork which maintains a stable + ;; reference to the prebuild commit. + (url "https://github.com/simendsjo/claw-raylib") + (commit "prebuild-raylib-5.5-and-raygui-4.0"))) + (file-name (git-file-name name version)) + (sha256 + (base32 "19xaxcinw4lxsp4snaa2azcxz9hwii729gfpcv2vdw7qlzc9cg9g")))) + (build-system asdf-build-system/sbcl) + (arguments + (list + #:asd-systems + ''("claw-raylib" + "claw-raylib/examples") + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'fix-paths + (lambda _ + (substitute* "library.lisp" + (("libraylib\\.so") + (string-append #$(this-package-input "raylib") "/lib/libraylib.so")) + (("libraygui\\.so") + (string-append #$(this-package-input "raygui") "/lib/libraygui.so"))))) + (add-before 'build 'build-libraries + (lambda _ + ;; Converted from the "Compile the adapters" in the README + (let ((lib (string-append #$output "/share/common-lisp/sbcl/claw-raylib/lib"))) + (invoke #$(cc-for-target) "-O3" "-fPIC" "-shared" + "-o" (string-append lib "/libraylib-adapter.so") + (string-append lib "/libraylib-adapter.x86_64-pc-linux-gnu.c")) + (invoke #$(cc-for-target) "-O3" "-fPIC" "-shared" + "-o" (string-append lib "/librlgl-adapter.so") + (string-append lib "/librlgl-adapter.x86_64-pc-linux-gnu.c")) + (invoke #$(cc-for-target) "-O3" "-fPIC" "-shared" + "-o" (string-append lib "/libraygui-adapter.so") + (string-append lib "/libraygui-adapter.x86_64-pc-linux-gnu.c")))))))) + (inputs + (list sbcl-alexandria + sbcl-global-vars + sbcl-cffi + sbcl-cffi-ops + sbcl-cffi-object + raylib + raygui)) + (home-page "https://github.com/bohonghuang/claw-raylib") + (synopsis "Fully auto-generated Common Lisp bindings to Raylib and Raygui") + (description "Fully auto-generated Common Lisp bindings to Raylib and +Raygui.") + (license license:asl2.0))) + +;; This does not work yet +#;(define-public ecl-claw-raylib + (sbcl-package->ecl-package sbcl-claw-raylib)) + +;; This does not work yet +#;(define-public cl-claw-raylib + (sbcl-package->cl-source-package sbcl-claw-raylib)) + (define-public sbcl-claw-support (package (name "sbcl-claw-support") @@ -12203,8 +12468,8 @@ interfaces as well as a functional and an object oriented interface.") `(cons "clsql-cffi" ,asd-systems))))))) (define-public sbcl-clss - (let ((revision "2") - (commit "f62b849189c5d1be378f0bd3d403cda8d4fe310b")) + (let ((revision "3") + (commit "cd5f603e8207ec23c147c5cfda636ef8273a7525")) (package (name "sbcl-clss") (version (git-version "0.3.1" revision commit)) @@ -12213,10 +12478,10 @@ interfaces as well as a functional and an object oriented interface.") (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/clss") + (url "https://codeberg.org/shinmera/clss") (commit commit))) (sha256 - (base32 "1033dchpanhcgxl5qfhr80aw9adbp9bvllhzvvy5p9mrfnidd1fv")) + (base32 "15wh1zafamxc5z5hni9ni72xg4n24am2xfqv7fwwhfw1sl06bcm2")) (file-name (git-file-name name version)))) (inputs (list sbcl-array-utils sbcl-plump)) @@ -12224,7 +12489,7 @@ interfaces as well as a functional and an object oriented interface.") (synopsis "DOM tree searching engine based on CSS selectors") (description "CLSS is a DOM traversal engine based on CSS selectors. It makes use of the Plump-DOM and is used by lQuery.") - (home-page "https://github.com/Shinmera/clss") + (home-page "https://codeberg.org/shinmera/clss") (license license:zlib)))) (define-public cl-clss @@ -12859,6 +13124,79 @@ or cl-launch for portable processing of command-line arguments.") (define-public clasp-command-line-arguments (sbcl-package->clasp-package sbcl-command-line-arguments)) +(define-public sbcl-common-doc + (let ((commit "bcde4cfee3d34482d9830c8f9ea45454c73cf5aa") + (revision "0")) + (package + (name "sbcl-common-doc") + (version (git-version "0.2.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/CommonDoc/common-doc") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0bzc4w37cq5mbkd15vxziks6nq58yad04mki4nwy5w6pza7z0faa")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-fiveam)) + (inputs + (list sbcl-alexandria + sbcl-anaphora + sbcl-cl-ppcre + sbcl-closer-mop + sbcl-local-time + sbcl-quri + sbcl-split-sequence + sbcl-trivial-shell + sbcl-trivial-types)) + (home-page "https://github.com/CommonDoc/common-doc") + (synopsis "Framework for representing and manipulating documents") + (description "Framework for representing and manipulating documents.") + (license license:expat)))) + +(define-public ecl-common-doc + (sbcl-package->ecl-package sbcl-common-doc)) + +(define-public cl-common-doc + (sbcl-package->cl-source-package sbcl-common-doc)) + +(define-public sbcl-common-html + (let ((commit "96987bd9db21639ed55d1b7d72196f9bc58243fd") + (revision "0")) + (package + (name "sbcl-common-html") + (version (git-version "0.1.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/CommonDoc/common-html") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1i11w4l95nybz5ibnaxrnrkfhch2s9wynqrg6kx6sl6y47khq1xz")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-fiveam)) + (inputs + (list sbcl-alexandria + sbcl-anaphora + sbcl-common-doc + sbcl-plump)) + (home-page "https://github.com/CommonDoc/common-html") + (synopsis "HTML parser/emitter for CommonDoc") + (description "HTML parser/emitter for CommonDoc.") + (license license:expat)))) + +(define-public ecl-common-html + (sbcl-package->ecl-package sbcl-common-html)) + +(define-public cl-common-html + (sbcl-package->cl-source-package sbcl-common-html)) + (define-public sbcl-common-lisp-jupyter (let ((commit "3555a009f6d8734751bda1feadc8a09e7b0099b6") (revision "0")) @@ -12907,6 +13245,43 @@ building Jupyter kernels, based on Maxima-Jupyter which was based on (define-public ecl-common-lisp-jupyter (sbcl-package->ecl-package sbcl-common-lisp-jupyter)) +(define-public sbcl-commondoc-markdown + (let ((commit "7abd28806bec33f291b982684d143edddb5cc32a") + (revision "0")) + (package + (name "sbcl-commondoc-markdown") + (version (git-version "0.5.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/40ants/commondoc-markdown") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "12n8yx8jhz8713r63gmrymplm1mfczm7q7a343d13wl6gng1gjs1")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-hamcrest)) + (inputs + (list sbcl-3bmd + sbcl-cl-str + sbcl-common-doc + sbcl-common-html + sbcl-ironclad + sbcl-plump)) + (home-page "https://github.com/40ants/commondoc-markdown") + (synopsis "Converts Markdown text into CommonDoc nodes and vice versa") + (description "Converts Markdown text into CommonDoc nodes and vice +versa.") + (license license:unlicense)))) + +(define-public ecl-commondoc-markdown + (sbcl-package->ecl-package sbcl-commondoc-markdown)) + +(define-public cl-commondoc-markdown + (sbcl-package->cl-source-package sbcl-commondoc-markdown)) + (define-public sbcl-compatible-metaclasses (package (name "sbcl-compatible-metaclasses") @@ -13611,6 +13986,42 @@ on UNIX like platforms.") (define-public ecl-daemon (sbcl-package->ecl-package sbcl-daemon)) +(define-public sbcl-damn-fast-priority-queue + (let ((commit "f4c03741d05c757aed245b41a5c3f8c7096cc1d2") + (revision "0")) + (package + (name "sbcl-damn-fast-priority-queue") + (version (git-version "0.0.2" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/phoe/damn-fast-priority-queue") + (commit commit))) + (file-name (git-file-name "damn-fast-priority-queue" version)) + (sha256 + (base32 "0ch4yma51r2lnsjpr45mxga7sf03l3c76l6ijffm1rq2g9ywaksa")))) + (build-system asdf-build-system/sbcl) + (inputs + (list sbcl-alexandria)) + (arguments + `(#:asd-systems '("damn-fast-priority-queue" + "damn-fast-stable-priority-queue"))) + (synopsis "Fast priority queue") + (description + "A heap-based priority queue whose first and foremost priority is speed.") + (home-page "https://github.com/phoe/damn-fast-priority-queue") + (license license:expat)))) + +(define-public cl-damn-fast-priority-queue + (sbcl-package->cl-source-package sbcl-damn-fast-priority-queue)) + +(define-public ecl-damn-fast-priority-queue + (sbcl-package->ecl-package sbcl-damn-fast-priority-queue)) + +(define-public clasp-damn-fast-priority-queue + (sbcl-package->clasp-package sbcl-damn-fast-priority-queue)) + (define-public sbcl-data-format-validation (let ((commit "95d44766e829582598f9dcdc5c23719c462d5bfb") (revision "1")) @@ -14237,8 +14648,8 @@ manner.") (sbcl-package->ecl-package sbcl-depot)) (define-public sbcl-dexador - (let ((commit "051cbb784ea3015cef9731eb5a624f3122de84b5") - (revision "2")) + (let ((commit "d7ac217819e9156abe10cd28ba7a2d548be03cad") + (revision "3")) (package (name "sbcl-dexador") (build-system asdf-build-system/sbcl) @@ -14252,7 +14663,7 @@ manner.") (commit commit))) (file-name (git-file-name "cl-dexador" version)) (sha256 - (base32 "1sggpi43la8dai102fmkzysh7760hvk6q68f0pkbb9187vz8nd3y")))) + (base32 "19y95k821665vcy7gbxhh4rqwk7fh4brv1sgkaykncpw2l2lll5r")))) (inputs (list sbcl-alexandria sbcl-babel @@ -14638,6 +15049,46 @@ for more information.") (define-public ecl-documentation-utils-extensions (sbcl-package->ecl-package sbcl-documentation-utils-extensions)) +(define-public sbcl-docs-config + (let ((commit "9f8f253b1e1cb451c91f3ec9ab700e99461f0fe8") + (revision "0")) + (package + (name "sbcl-docs-config") + (version (git-version "0.8.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/40ants/docs-builder") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1w1fx5b193s5zifnp22sha8s4vqa15p3kg8fwl60yv90gk4wvwwm")))) + (build-system asdf-build-system/sbcl) + (arguments + (list + ;; We only build docs-config as sbcl-40ants-doc requires this project, + ;; and the other systems here requires sbcl-40ants-doc + #:asd-systems ''("docs-config"))) + (inputs + (list sbcl-file-types + sbcl-geneva + sbcl-log4cl + sbcl-macro-html + sbcl-maxpc + sbcl-texp + sbcl-trivial-documentation)) + (home-page "https://github.com/40ants/docs-builder") + (synopsis "Generic documentation builder for Common Lisp projects") + (description "Generic documentation builder for Common Lisp projects.") + (license license:unlicense)))) + +(define-public ecl-docs-config + (sbcl-package->ecl-package sbcl-docs-config)) + +(define-public cl-docs-config + (sbcl-package->cl-source-package sbcl-docs-config)) + (define-public sbcl-doplus (package (name "sbcl-doplus") @@ -15273,7 +15724,7 @@ in which case it returns the appropriate closure.") (define-public sbcl-envy (let ((commit "26a7faadc981f2a047daa36f715a44faec5dd00c") - (revision "2")) + (revision "2")) (package (name "sbcl-envy") (version (git-version "0.1" revision commit)) @@ -15582,6 +16033,32 @@ sacrificing much in the way of power.") (define-public ecl-external-program (sbcl-package->ecl-package sbcl-external-program)) +(define-public sbcl-f-underscore + (package + (name "sbcl-f-underscore") + (version "0.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://gitlab.common-lisp.net/bpm/f-underscore") + (commit "7988171194cd259e12469dd7c30000be6ef1b31a"))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0mqvb2rxa08y07lj6smp8gf1ig32802fxq7mw5a283f2nkrinnb5")))) + (build-system asdf-build-system/sbcl) + (synopsis "Lambda shorthand macros") + (description "Convenient macros for common lambda patterns.") + (license license:public-domain) + (home-page "https://gitlab.common-lisp.net/bpm/f-underscore"))) + +(define-public ecl-f-underscore + (sbcl-package->ecl-package sbcl-f-underscore)) + +(define-public cl-f-underscore + (sbcl-package->cl-source-package sbcl-f-underscore)) + (define-public sbcl-f2cl (let ((commit "a3dabbe429ff2fe6039a60c2546d287b4157f546") (revision "1")) @@ -16217,6 +16694,35 @@ directly.") (define-public ecl-file-select (sbcl-package->ecl-package sbcl-file-select)) +(define-public sbcl-file-types + (let ((commit "6f5676b2781f617b6009ae4ce001496ea43b6fac") + (revision "0")) + (package + (name "sbcl-file-types") + (version (git-version "0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/eugeneia/file-types") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "09l67gzjwx7kx237grm709dsj9rkmmm8s3ya6irmcw8nh587inbs")))) + (build-system asdf-build-system/sbcl) + (home-page "https://github.com/eugeneia/file-types") + (synopsis "Simple scheme to classify file types in a hierarchical +fashion") + (description "Simple scheme to classify file types in a hierarchical +fashion.") + (license license:agpl1)))) + +(define-public ecl-file-types + (sbcl-package->ecl-package sbcl-file-types)) + +(define-public cl-file-types + (sbcl-package->cl-source-package sbcl-file-types)) + (define-public sbcl-filesystem-utils (let ((commit "a07e8b61b89d4b46408fb9294d9b8130e8c8a02e") (revision "2")) @@ -17243,6 +17749,36 @@ the CDR-8 standard.") (define-public ecl-generic-comparability (sbcl-package->ecl-package sbcl-generic-comparability)) +(define-public sbcl-geneva + (let ((commit "126d330aec6c3b1cba212387888c738bf7196dec") + (revision "0")) + (package + (name "sbcl-geneva") + (version (git-version "0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/eugeneia/geneva") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1pw18xkbndqssx6iix8a8zcw8bgjh88jxxxrklkgkghk04bmqxw3")))) + (build-system asdf-build-system/sbcl) + (inputs + (list sbcl-split-sequence + sbcl-named-readtables)) + (home-page "https://github.com/eugeneia/geneva") + (synopsis "Portable document preparation system") + (description "Portable document preparation system.") + (license license:agpl1)))) + +(define-public ecl-geneva + (sbcl-package->ecl-package sbcl-geneva)) + +(define-public cl-geneva + (sbcl-package->cl-source-package sbcl-geneva)) + (define-public sbcl-genhash (let ((commit "220ae1af8361dbd2005177f2ee11072b6a33934f") (revision "1")) @@ -17986,7 +18522,7 @@ deletion.") commit "/LICENSE"))) (inputs - (list hdf5-1.10 sbcl-cffi)) + (list hdf5 sbcl-cffi)) (native-inputs (list sbcl-fiveam)) (arguments @@ -18014,7 +18550,9 @@ deletion.") "src/h5t-grovel.lisp" "src/h5z-grovel.lisp") (("_H5private_H") - "H5private_H")))) + "H5private_H") + (("\\(\\(:H5I-REFERENCE \"H5I_REFERENCE\"\\)\\)") + "")))) (add-after 'unpack 'fix-dependencies (lambda* (#:key inputs #:allow-other-keys) (substitute* "hdf5-cffi.asd" @@ -19450,6 +19988,44 @@ and macros, primarily for software projects written in CL by the author.") (define-public clasp-jpl-util (sbcl-package->clasp-package sbcl-jpl-util)) +(define-public sbcl-json-mop + (let ((commit "66705776dec7056fabba09646d726782baf019d9") + (revision "0")) + (package + (name "sbcl-json-mop") + (version (git-version "0.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/gschjetne/json-mop") + (commit commit))) + (file-name (git-file-name name commit)) + (sha256 + (base32 "1q6mmq64hf4v448bnzfh8nxsxg5h18a9snh785r1fnvv1aij3fi1")))) + (build-system asdf-build-system/sbcl) + (arguments + (list + #:asd-systems ''("json-mop"))) + (native-inputs + (list )) + (inputs + (list sbcl-closer-mop + sbcl-yason + sbcl-anaphora)) + (home-page "https://github.com/gschjetne/json-mop") + (synopsis "Metaclass for bridging CLOS and JSON") + (description "Small library aiming to cut down time spent moving data +between CLOS and JSON objects. It depends on YASON and it should be possible to +use it alongside straight calls to functions from YASON.") + (license license:expat)))) + +(define-public ecl-json-mop + (sbcl-package->ecl-package sbcl-json-mop)) + +(define-public cl-json-mop + (sbcl-package->cl-source-package sbcl-json-mop)) + (define-public sbcl-json-streams (let ((commit "5da012e8133affbf75024e7500feb37394690752") (revision "1")) @@ -19600,7 +20176,7 @@ defined.") (define-public sbcl-jzon (package (name "sbcl-jzon") - (version "1.1.0") + (version "1.1.4") (source (origin (method git-fetch) @@ -19609,7 +20185,7 @@ defined.") (commit (string-append "v" version)))) (file-name (git-file-name "cl-jzon" version)) (sha256 - (base32 "0rbardn1dfizpyyy1c127zzk1fnq4pslz75xa7ldpfjsi5jc5fmr")))) + (base32 "0z7xpylyk8rakz449rxqpz4hazn91ap2dnf0689iigdvvl3yqz3g")))) (build-system asdf-build-system/sbcl) (arguments '(#:asd-systems '("com.inuoe.jzon") @@ -19883,7 +20459,7 @@ performance and simplicity in mind.") (define-public sbcl-lambda-fiddle (let ((commit "d16bba55acf6065b412f64ab8fdff679a4a32b1e") ;; no tagged branch - (revision "1")) + (revision "1")) (package (name "sbcl-lambda-fiddle") (version (git-version "1.0.0" revision commit)) @@ -20064,8 +20640,8 @@ LASS files.") (list #:tests? #f)))) (define-public sbcl-legit - (let ((commit "9c677b9b798803d37ab6f5e0e0705441872f7230") - (revision "3")) + (let ((commit "877147a3b4b17dff49a4ca21a30e067b7750aee8") + (revision "4")) (package (name "sbcl-legit") (version (git-version "1.0.0" revision commit)) @@ -20073,11 +20649,11 @@ LASS files.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/legit") + (url "https://codeberg.org/shinmera/legit") (commit commit))) (file-name (git-file-name "cl-legit" version)) (sha256 - (base32 "0jy021ywrbnkgbgb63ip6j7kr40m4wz2pz1v5ybn6xkkn6dyprsz")))) + (base32 "06cvplibn21nm9l4k3j4rik549wrcbscjfrz00l0gmxh68qsqy31")))) (build-system asdf-build-system/sbcl) (arguments `(#:phases @@ -20094,7 +20670,7 @@ LASS files.") sbcl-documentation-utils sbcl-lambda-fiddle sbcl-simple-inferiors)) - (home-page "https://shinmera.github.io/legit/") + (home-page "https://codeberg.org/shinmera/legit") (synopsis "Interface to the git binary") (description "This is an interface to the @code{git} binary to make controlling it @@ -20708,7 +21284,7 @@ syntax such that is accepts Org files as Lisp source code files.") (define-public sbcl-livesupport (let ((commit "71e6e412df9f3759ad8378fabb203913d82e228a") - (revision "1")) + (revision "1")) (package (name "sbcl-livesupport") (version (git-version "0.0.0" revision commit)) @@ -20948,6 +21524,65 @@ and mix text with expressions.") (define-public ecl-log4cl (sbcl-package->ecl-package sbcl-log4cl)) +(define-public sbcl-log4cl-extras + (let ((commit "7df9566cfecf6ed418ea85c2aa2f886dfb6f12af") + (revision "0")) + (package + (name "sbcl-log4cl-extras") + (version (git-version "0.7.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/40ants/log4cl-extras") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "17p8y884163j0gab0idra297kivzdgagl2im0gkmdhgrh0dw3b53")))) + (build-system asdf-build-system/sbcl) + (arguments + (list + #:phases + #~(modify-phases %standard-phases + ;; The package is explicitly not included to avoid pulling in a + ;; dependency, but the tests are included. We ignore the test to + ;; truly ignore the module. + (add-after 'unpack 'do-not-test-ignored-secrets-system + (lambda _ + (substitute* "log4cl-extras-test.asd" + (("\"log4cl-extras-test/secrets") + "#+nil\"log4cl-extras-test/secrets"))))))) + (native-inputs + (list sbcl-hamcrest + sbcl-40ants-asdf-system)) + (inputs + (list sbcl-with-output-to-stream + sbcl-pythonic-string-reader + sbcl-log4cl + sbcl-cl-strings + sbcl-jonathan + sbcl-40ants-doc)) + (home-page "https://github.com/40ants/log4cl-extras") + (synopsis "Addons to LOG4CL: JSON appender, context fields, cross-finger +appender, etc.") + (description + "This library extends LOG4CL system in a few ways: + +* It helps with configuration of multiple appenders and layouts. +* Has a facility to catch context fields and to log them. +* Has a macro to log unhandled errors. +* Adds a layout to write messages as JSON, which is useful for production as +makes easier to parse and process such logs. +* Uses the appenders which are not disabled in case of some error which again, +should be useful for production.") + (license license:bsd-0)))) + +(define-public ecl-log4cl-extras + (sbcl-package->ecl-package sbcl-log4cl-extras)) + +(define-public cl-log4cl-extras + (sbcl-package->cl-source-package sbcl-log4cl-extras)) + (define-public sbcl-lorem-ipsum (let ((commit "04a1839a03b53c954e799b9cf570ac915b032ce8") (revision "0")) @@ -21037,8 +21672,8 @@ Lisp, featuring: (sbcl-package->ecl-package sbcl-lparallel)) (define-public sbcl-lquery - (let ((revision "1") - (commit "8048111c6b83956daa632e7a3ffbd8c9c203bd8d")) + (let ((revision "2") + (commit "08c9cb6c2b169bf71d4444bc80e87e5b19f8499c")) (package (name "sbcl-lquery") (version (git-version "3.2.1" revision commit)) @@ -21047,10 +21682,10 @@ Lisp, featuring: (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/lquery") + (url "https://codeberg.org/shinmera/lquery") (commit commit))) (sha256 - (base32 "0520mcpxc2d6fdm8z61arpgd2z38kan7cf06qs373n5r64rakz6w")) + (base32 "11l03pwlvv76lxrmvjs3prkrjsgl70wz7vbl1n6rhg9kmyv91a74")) (file-name (git-file-name name version)))) (native-inputs (list sbcl-fiveam)) @@ -21064,7 +21699,7 @@ functions. It uses Plump and CLSS as DOM and selector engines. The main idea behind lQuery is to provide a simple interface for crawling and modifying HTML sites, as well as to allow for an alternative approach to templating.") - (home-page "https://github.com/Shinmera/lquery") + (home-page "https://codeberg.org/shinmera/lquery") (license license:zlib)))) (define-public cl-lquery @@ -21201,6 +21836,39 @@ LispWorks library that are used in software such as ContextL.") (define-public clasp-lw-compat (sbcl-package->clasp-package sbcl-lw-compat)) +(define-public sbcl-lwcells + (let ((commit "e7446ac146a31b630e74c9bce7dab34b50cc333d") + (revision "0")) + (package + (name "sbcl-lwcells") + (version (git-version "0.0.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/kchanqvq/lwcells") + (commit commit))) + (file-name (git-file-name "lwcells" version)) + (sha256 + (base32 "1p8a5j52isp14w6pxy6c6fsrwwvnyb9r6yvd8bxh7sjh6mnvp3nc")))) + (build-system asdf-build-system/sbcl) + (inputs + (list sbcl-alexandria + sbcl-named-closure + sbcl-damn-fast-priority-queue)) + (synopsis "Light-weight cells for dataflow programming") + (description + "A dataflow extension to Common Lisp that maintains a consistent state of +cells according to functions specifying their relation.") + (home-page "https://github.com/kchanqvq/lwcells") + (license license:gpl3+)))) + +(define-public cl-lwcells + (sbcl-package->cl-source-package sbcl-lwcells)) + +(define-public ecl-lwcells + (sbcl-package->ecl-package sbcl-lwcells)) + (define-public sbcl-lzlib (let ((commit "22767ca12d1c1bd59a7ae1f9c5ef7d2e937206bb") (revision "2")) @@ -21282,6 +21950,37 @@ about the machine, process, etc.") (define-public ecl-machine-state (sbcl-package->ecl-package sbcl-machine-state)) +(define-public sbcl-macro-html + (let ((commit "c769b5db9da6dd61365a21fc61ba07ea0f5f1963") + (revision "0")) + (package + (name "sbcl-macro-html") + (version (git-version "1.2" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/eugeneia/macro-html") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "05gzgijz8r3dw3ilz7d5i0g0mbcyv9k8w2dgvw7n478njp1gfj4b")))) + (build-system asdf-build-system/sbcl) + (inputs + (list sbcl-named-readtables)) + (home-page "https://github.com/eugeneia/macro-html") + (synopsis "HTML generation library") + (description "Aims to be fast, modular, cachable and concise. It does so +by defining each tag as a macro which expands to code printing the respective +HTML source. Also employs a DSL for element attributes.") + (license license:agpl1)))) + +(define-public ecl-macro-html + (sbcl-package->ecl-package sbcl-macro-html)) + +(define-public cl-macro-html + (sbcl-package->cl-source-package sbcl-macro-html)) + (define-public sbcl-magic-ed (let ((commit "30bb27832d4e3e362578e7320934638f9889a8c4") (revision "1")) @@ -22264,7 +22963,7 @@ extensions to Common Lisp. It contains: (define-public sbcl-mito (let ((commit "47ba4865ca4bb2894b53703a49a299e973f8eb86") - (revision "3")) + (revision "3")) (package (name "sbcl-mito") (version (git-version "0.1" revision commit)) @@ -23013,6 +23712,40 @@ JSON handling. Load the parser backend you prefer! (define-public ecl-nactivitypub (sbcl-package->ecl-package sbcl-nactivitypub)) +(define-public sbcl-named-closure + (let ((commit "d57305582137a24d6c8f8375fba496c653bb5699") + (revision "0")) + (package + (name "sbcl-named-closure") + (version (git-version "0.0.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/kchanqvq/named-closure") + (commit commit))) + (file-name (git-file-name "named-closure" version)) + (sha256 + (base32 "17lpslk7amh9pghjpjdnd1aj50r1kdc4iyai2h2xas7wampg5xf5")))) + (build-system asdf-build-system/sbcl) + (inputs + (list sbcl-alexandria + sbcl-serapeum + sbcl-iterate + sbcl-trivial-cltl2)) + (synopsis "Introspectable, readably-printable and redefinable closures") + (description + "A CLOS class that defines callable objects whose behavior is similar to +closures but adds conveniences such as introspectability.") + (home-page "https://github.com/kchanqvq/named-closure") + (license license:expat)))) + +(define-public cl-named-closure + (sbcl-package->cl-source-package sbcl-named-closure)) + +(define-public ecl-named-closure + (sbcl-package->ecl-package sbcl-named-closure)) + (define-public sbcl-named-readtables (let ((commit "d5ff162ce02035ec7de1acc9721385f325e928c0") (revision "4")) @@ -24006,6 +24739,63 @@ browser).") (define-public clasp-open-with (sbcl-package->clasp-package sbcl-open-with)) +(define-public sbcl-openapi-generator + (let ((commit "7c3842a6ed36ba2796dcd35fd1d65d488eecf749") + (revision "0")) + (package + (name "sbcl-openapi-generator") + (version (git-version "0.0.2" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://codeberg.org/kilianmh/openapi-generator.git") + (commit commit))) + (file-name (git-file-name name commit)) + (sha256 + (base32 "0cv0p4lv6kb7kv8fnnbrhrdqk2n79pl6ddlh0jz0a0n44f96vm0h")))) + (build-system asdf-build-system/sbcl) + (arguments + (list + #:asd-systems ''("openapi-generator") + #:phases + #~(modify-phases %standard-phases + ;; This file makes a remote call at compile time + (add-after 'unpack 'ignore-collections + (lambda _ + (substitute* "openapi-generator.asd" + (("\\(:file \"collection") "#+nil(:file \"collection"))))))) + (native-inputs + (list sbcl-fiveam)) + (inputs + (list sbcl-cl-str + sbcl-cl-hash-util + sbcl-cl-semver + sbcl-pathname-utils + sbcl-json-mop + sbcl-yason + sbcl-jzon + sbcl-cl-project + sbcl-listopia + sbcl-alexandria + sbcl-serapeum + sbcl-quri + sbcl-dexador + sbcl-cl-json-pointer + sbcl-moptilities + sbcl-parse-float + sbcl-cl-yaml)) + (home-page "https://gitlab.com/lockie/trivial-adjust-simple-array") + (synopsis "OpenAPI client system generator") + (description "OpenAPI client system generator.") + (license license:agpl3+)))) + +(define-public ecl-openapi-generator + (sbcl-package->ecl-package sbcl-openapi-generator)) + +(define-public cl-openapi-generator + (sbcl-package->cl-source-package sbcl-openapi-generator)) + (define-public sbcl-opticl (let ((commit "f6fc4dc5fa61ae3f2527b77e4bda99001ba37dcb") (revision "1")) @@ -24873,8 +25663,8 @@ table.") (sbcl-package->clasp-package sbcl-periodic-table)) (define-public sbcl-periods - (let ((commit "60383dcef88a1ac11f82804ae7a33c361dcd2949") - (revision "2")) + (let ((commit "1494b8f6887c3ce33d0bf094fd7ec7b77d38c998") + (revision "3")) (package (name "sbcl-periods") (version (git-version "0.0.2" revision commit)) @@ -24884,14 +25674,13 @@ table.") (uri (git-reference (url "https://github.com/jwiegley/periods") (commit commit))) - (file-name (git-file-name name version)) + (file-name (git-file-name "cl-periods" version)) (sha256 - (base32 - "1ym2j4an9ig2hl210jg91gpf7xfnp6mlhkw3n9kkdnwiji3ipqlk")))) + (base32 "1m958891rl3sin6h6pgfjdh6ay1s7kfxbxpqvlnzk9rqid0hcs15")))) (build-system asdf-build-system/sbcl) (inputs - `(("local-time" ,sbcl-local-time) - ("series" ,sbcl-series))) + (list sbcl-local-time + sbcl-series)) (arguments '(#:asd-systems '("periods" "periods-series"))) @@ -25048,8 +25837,8 @@ for Common Lisp.") (sbcl-package->clasp-package sbcl-piping)) (define-public sbcl-plump - (let ((commit "0c3e0b57b43b6e0c5794b6a902f1cf5bee2a2927") - (revision "3")) + (let ((commit "251fbe02e9bcdb5940d881788b880d51f7f35303") + (revision "4")) (package (name "sbcl-plump") (version (git-version "2.0.0" revision commit)) @@ -25058,11 +25847,11 @@ for Common Lisp.") (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/plump") + (url "https://codeberg.org/shinmera/plump") (commit commit))) (file-name (git-file-name "cl-plump" version)) (sha256 - (base32 "1fyb66pqvr1iy31ah9638ihs8cax17zkxk0zq14jy7x5l9rq1qlf")))) + (base32 "0w2n5wskgqvazb721amfd7smydnj3mxsyzg03xk2k1vaizzxdzvk")))) (build-system asdf-build-system/sbcl) (inputs (list sbcl-array-utils sbcl-documentation-utils)) @@ -25074,7 +25863,7 @@ bad closing tag order, unencoded entities, inexistent tag types, self-closing tags and so on. It parses documents to a class representation and offers a small set of DOM functions to manipulate it. It can be extended to parse to your own classes.") - (home-page "https://shinmera.github.io/plump/") + (home-page "https://codeberg.org/shinmera/plump") (license license:zlib)))) (define-public cl-plump @@ -25087,8 +25876,8 @@ your own classes.") (sbcl-package->clasp-package sbcl-plump)) (define-public sbcl-plump-sexp - (let ((commit "bbcf75e9ecda8fe7603098ab8c15828407bb4f08") - (revision "0")) + (let ((commit "a40f66dbc7bf9d5957b1f85b184ce6798519ab96") + (revision "1")) (package (name "sbcl-plump-sexp") (version (git-version "0.1.0" revision commit)) @@ -25097,12 +25886,12 @@ your own classes.") (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/plump-sexp") + (url "https://codeberg.org/shinmera/plump-sexp") (commit commit))) (file-name (git-file-name "cl-plump-sexp" version)) (sha256 (base32 - "0zm9h0assjb8766z2v6l1k1s60y90y6f8smrl1dczwqlvc8xyln5")))) + "0iyz4xn7sk6pxx9avc2ajcy9268zdfr3xyvi16hgpajwcbqi5sjq")))) (build-system asdf-build-system/sbcl) (inputs (list sbcl-plump)) @@ -25110,7 +25899,7 @@ your own classes.") (description "The Plump-SEXP library is a backend for Plump which can convert between S-expressions and the Plump DOM.") - (home-page "https://github.com/Shinmera/plump-sexp") + (home-page "https://codeberg.org/shinmera/plump-sexp") (license license:zlib)))) (define-public cl-plump-sexp @@ -25826,13 +26615,13 @@ an array-based heap.") (file-name (git-file-name "proc-parse" version)))) (build-system asdf-build-system/sbcl) (inputs - `(("alexandria" ,sbcl-alexandria) - ("babel" ,sbcl-babel))) + (list sbcl-alexandria + sbcl-babel)) (native-inputs (list sbcl-prove)) (arguments '(#:asd-systems '("proc-parse-test" - "proc-parse"))) + "proc-parse"))) (synopsis "Procedural vector parser") (description "This is a string/octets parser library for Common Lisp with speed and @@ -27389,6 +28178,39 @@ internbombing, excessive input and macro characters.") (define-public ecl-safe-read (sbcl-package->ecl-package sbcl-safe-read)) +(define-public sbcl-salmagundi + (let ((commit "aa231f6043111ec5dbeb06feab732efb7d59c959") + (revision "0")) + (package + (name "sbcl-salmagundi") + (version (git-version "0.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/s-expressionists/Salmagundi") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1i0hknnd555ih509kvna2xdirfxyy05wr2bp628997rnj8drlsnx")))) + (build-system asdf-build-system/sbcl) + (inputs (list sbcl-trivial-package-locks)) + (home-page "https://github.com/s-expressionists/Salmagundi") + (synopsis "Implementation of Common Lisp hash tables") + (description "This library contains code that implements Common Lisp +hash tables.") + (license license:bsd-2)))) + +(define-public cl-salmagundi + (sbcl-package->cl-source-package sbcl-salmagundi)) + +(define-public ecl-salmagundi + (sbcl-package->ecl-package sbcl-salmagundi)) + +(define-public clasp-salmagundi + (sbcl-package->clasp-package sbcl-salmagundi)) + (define-public sbcl-salza2 (package (name "sbcl-salza2") @@ -27582,8 +28404,8 @@ atlases.") (sbcl-package->ecl-package sbcl-sdf)) (define-public sbcl-sdl2 - (let ((commit "80410b514570ca06894675d4a2a5fc93287ea7b6") - (revision "2")) + (let ((commit "8c78e68cc5c1477dcd4c81a707e35912c2529536") + (revision "3")) (package (name "sbcl-sdl2") (version (git-version "0.0.0" revision commit)) @@ -27595,7 +28417,7 @@ atlases.") (commit commit))) (file-name (git-file-name "cl-sdl2" version)) (sha256 - (base32 "0sjy4k04k0hdhwpr57ns16ag3za0kz4laclbk17i91ql7qdjw9z2")))) + (base32 "0ix2nsg2ghmkcfdhwlvgylfijg0nzbadgfch5dgyakmxmiv3rs4k")))) (build-system asdf-build-system/sbcl) (arguments `(#:asd-systems '("sdl2" "sdl2/examples") @@ -27628,8 +28450,8 @@ C Library.") (sbcl-package->ecl-package sbcl-sdl2)) (define-public sbcl-sdl2-image - (let ((commit "9c05c806286b66a5d9861ef829cfe68c4f3da077") - (revision "1")) + (let ((commit "3963be863e1df371b2c3f17f1bc59bc572c5954b") + (revision "2")) (package (name "sbcl-sdl2-image") (version (git-version "1.0" revision commit)) @@ -27641,7 +28463,7 @@ C Library.") (commit commit))) (file-name (git-file-name "cl-sdl2-image" version)) (sha256 - (base32 "1nr7mdl125q32m15m8rdlza5kwi7m0birh1cq846pyy6zl1sjms7")))) + (base32 "1jzrz3ppr5nbh0w6cvbbpv5x6gdq71a6v2qanvnjvcjs0zwf97iq")))) (build-system asdf-build-system/sbcl) (arguments (list #:phases @@ -27704,8 +28526,8 @@ games.") (sbcl-package->ecl-package sbcl-sdl2kit)) (define-public sbcl-sdl2-mixer - (let ((commit "fdcc7ee7935dd01fd338e22690451db2cf126156") - (revision "1")) + (let ((commit "580d63402938e073705ab1905b6f9a4b9a48d175") + (revision "2")) (package (name "sbcl-sdl2-mixer") (version (git-version "1.0" revision commit)) @@ -27717,7 +28539,7 @@ games.") (commit commit))) (file-name (git-file-name "cl-sdl2-mixer" version)) (sha256 - (base32 "0g6ywb3gqr0rif4z6kkz6m8vyv8nrr5wr1w9sc6d3zypbbnqgbp6")))) + (base32 "0d33pmyrcni90qfj0d4hxf97may1bv7i9z4a6rj02dw254n9r9lh")))) (build-system asdf-build-system/sbcl) (arguments (list #:phases @@ -27725,8 +28547,13 @@ games.") (add-after 'unpack 'fix-paths (lambda* (#:key inputs #:allow-other-keys) (substitute* "src/library.lisp" - (("libSDL2_mixer-2.0.so.0") - (search-input-file inputs "/lib/libSDL2_mixer-2.0.so.0")))))))) + (("\"libSDL2_mixer-2.0.so.0\" \"libSDL2_mixer\"") + (string-append + "\"" + (search-input-file inputs "/lib/libSDL2_mixer-2.0.so.0") + "\" \"" + (search-input-file inputs "/lib/libSDL2_mixer.so") + "\"")))))))) (inputs (list sbcl-alexandria sbcl-cl-autowrap @@ -28199,6 +29026,31 @@ standard library.") (define-public cl-shlex (sbcl-package->cl-source-package sbcl-shlex)) +(define-public sbcl-sijo-doctest + (package + (name "sbcl-sijo-doctest") + (version "0.4.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://git.sr.ht/~simendsjo/sijo-doctest") + (commit "265106a7cb75571f05abe2bcf747c6f8e9d5282d"))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0zwsh80d019rddxzqbxwjl0dqrpplk27gbskc1fz8yi6aris7wzq")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-lisp-unit2)) + (synopsis "Doctests for Lisp") + (description "Doctests for Lisp.") + (license license:gpl2) + (home-page "https://git.sr.ht/~simendsjo/sijo-doctest"))) + +(define-public cl-sijo-doctest + (sbcl-package->cl-source-package sbcl-sijo-doctest)) + (define-public sbcl-simple-date-time (let ((commit "d6992afddedf67a8172a0120a1deac32afcaa2e8") (revision "1")) @@ -29522,6 +30374,33 @@ without the latter being aware of it.") (define-public ecl-stealth-mixin (sbcl-package->ecl-package sbcl-stealth-mixin)) +(define-public sbcl-stem + (let ((commit "901e859bdc2b8cc5d8e91dbaca8909e6db05fa84") + (revision "0")) + (package + (name "sbcl-stem") + (version (git-version "0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/hanshuebner/stem") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0a2kr09c3qcwg16n8rm15qgy5p9l6z4m72jray0846hqbnji77mp")))) + (build-system asdf-build-system/sbcl) + (home-page "https://github.com/hanshuebner/stem") + (synopsis "Porter Stemming Algorithm") + (description "Porter Stemming Algorithm.") + (license license:llgpl)))) + +(define-public ecl-stem + (sbcl-package->ecl-package sbcl-stem)) + +(define-public cl-stem + (sbcl-package->cl-source-package sbcl-stem)) + (define-public sbcl-stmx ;; No release for years and recent commits contain fixes for recent SBCL ;; versions. @@ -29807,10 +30686,11 @@ dynamically.") (sbcl-package->ecl-package sbcl-sxql-composer)) (define-public sbcl-sycamore - (let ((commit "fd2820fec165ad514493426dea209728f64e6d18")) + (let ((commit "0b50f6a69dd86818bdb4b833116dda9bc873d6f4") + (revision "1")) (package (name "sbcl-sycamore") - (version "0.0.20120604") + (version (git-version "0.0.20250808" revision commit)) (source (origin (method git-fetch) @@ -29819,7 +30699,7 @@ dynamically.") (commit commit))) (file-name (git-file-name name version)) (sha256 - (base32 "00bv1aj89q5vldmq92zp2364jq312zjq2mbd3iyz1s2b4widzhl7")))) + (base32 "1h5va9kbywr6n56k1397y0j3bpgn59h43fjq3sycq2hnl6lb4wi6")))) (build-system asdf-build-system/sbcl) (inputs (list sbcl-alexandria sbcl-cl-ppcre)) @@ -30001,17 +30881,31 @@ is not tail recursive.") ;; TODO: Build the tar program with 'build-program' when the ;; 'asdf-release-ops' library is added to Guix. (arguments - '(#:asd-systems '("tar" + (list + #:asd-systems ''("tar" "tar/common-extract" "tar/create" "tar/docs" "tar/extract" - "tar/simple-extract"))) + "tar/simple-extract") + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-to-compile-on-newer-40ants-doc + (lambda _ + (substitute* "src/docs.lisp" + ((":package-symbol \\(find-package :tar\\)") + ":package :tar") + ((":package-symbol \\(find-package :tar-simple-extract\\)") + ":package :tar-simple-extract") + ((":package-symbol \\(find-package :tar-extract\\)") + ":package :tar-extract") + ((":package-symbol \\(find-package :tar-create\\)") + ":package :tar-create"))))))) (native-inputs - (list sbcl-parachute)) + (list sbcl-parachute + sbcl-40ants-doc)) (inputs - (list sbcl-40ants-doc - sbcl-alexandria + (list sbcl-alexandria sbcl-babel sbcl-local-time sbcl-osicat @@ -30252,6 +31146,37 @@ emacs-slime.") (define-public ecl-terrable (sbcl-package->ecl-package sbcl-terrable)) +(define-public sbcl-texp + (let ((commit "3b5241441fec0151ace50b532043b2a407b4190d") + (revision "0")) + (package + (name "sbcl-texp") + (version (git-version "0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/eugeneia/texp") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1sbll7jwmzd86hg0zva8r7db2565nnliasv2x6rkrm9xl97q0kg5")))) + (build-system asdf-build-system/sbcl) + (inputs + (list sbcl-named-readtables)) + (home-page "https://github.com/eugeneia/texp") + (synopsis "Domain specific language for producing TeX documents with +Common Lisp") + (description "Domain specific language for producing TeX documents with +Common Lisp.") + (license license:agpl1)))) + +(define-public ecl-texp + (sbcl-package->ecl-package sbcl-texp)) + +(define-public cl-texp + (sbcl-package->cl-source-package sbcl-texp)) + (define-public sbcl-the-cost-of-nothing (let ((commit "f364029fbbf37ae5786f2f9ddf6185dd204a7185") (revision "0")) @@ -30295,9 +31220,42 @@ determine the cost of certain actions on a given platform and implementation.") (define-public clasp-the-cost-of-nothing (sbcl-package->clasp-package sbcl-the-cost-of-nothing)) +(define-public sbcl-tmpdir + (let ((commit "e1981284b969e04a48a3e7f3b98a50435e853eb6") + (revision "0")) + (package + (name "sbcl-tmpdir") + (version (git-version "0.0.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/moderninterpreters/tmpdir") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "11yshmg2wyd75ywwfybklm131d5rdw246pg35a6ksndiq3w5n4k8")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-fiveam + sbcl-osicat + sbcl-cl-fad)) + (inputs + (list sbcl-cl-fad)) + (home-page "https://github.com/moderninterpreters/tmpdir") + (synopsis "Simple library to create temporary directories") + (description "Simple library to create temporary directories.") + (license license:expat)))) + +(define-public ecl-tmpdir + (sbcl-package->ecl-package sbcl-tmpdir)) + +(define-public cl-tmpdir + (sbcl-package->cl-source-package sbcl-tmpdir)) + (define-public sbcl-tooter - (let ((commit "4583049c708b3f18d49d84aabfb19ec79210fda3") - (revision "6")) + (let ((commit "6d66a55a87f45cfa940b826ec990a3f5fa9b9630") + (revision "7")) (package (name "sbcl-tooter") (version (git-version "1.0.0" revision commit)) @@ -30305,11 +31263,11 @@ determine the cost of certain actions on a given platform and implementation.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/Shinmera/tooter") + (url "https://codeberg.org/shinmera/tooter") (commit commit))) (file-name (git-file-name "cl-tooter" version)) (sha256 - (base32 "1z9f8idvr2idn18xkw7ymxyglgc0lfhdhnq6xpbdmk5v8c1245iq")))) + (base32 "1i0hx0i6jgwf9c69m9wmlrv7hzq5n0k43r573jmsldbaxvnm4189")))) (build-system asdf-build-system/sbcl) (inputs (list sbcl-alexandria @@ -30321,7 +31279,7 @@ determine the cost of certain actions on a given platform and implementation.") (description "This is a Common Lisp library implementing the full v1 REST API protocol for Mastodon.") - (home-page "https://shinmera.github.io/tooter/") + (home-page "https://codeberg.org/shinmera/tooter") (license license:zlib)))) (define-public cl-tooter @@ -31089,6 +32047,39 @@ and @code{doseq*}.") (define-public clasp-trivial-do (sbcl-package->clasp-package sbcl-trivial-do)) +(define-public sbcl-trivial-documentation + (let ((commit "e71e7cf611ecd4a27bf5dba3add8698acda762ea") + (revision "0")) + (package + (name "sbcl-trivial-documentation") + (version (git-version "0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/eugeneia/trivial-documentation") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0y90zi6kaw7226xc089dl47677fz594a5ck1ld8yggk9ww7cdaav")))) + (build-system asdf-build-system/sbcl) + (arguments + (list + ;; Unable to build the test project. Haven't digged into why. + #:tests? #f)) + (inputs + (list sbcl-closer-mop)) + (home-page "https://github.com/eugeneia/trivial-documentation") + (synopsis "Scrape on-line documentation out of a running Lisp image") + (description "Scrape on-line documentation out of a running Lisp image.") + (license license:agpl1)))) + +(define-public ecl-trivial-documentation + (sbcl-package->ecl-package sbcl-trivial-documentation)) + +(define-public cl-trivial-documentation + (sbcl-package->cl-source-package sbcl-trivial-documentation)) + (define-public sbcl-trivial-download (let ((commit "d2472061d86b1cf3d32f388daacd4e32a13af699")) (package @@ -31589,6 +32580,39 @@ in DEFPACKAGE.") (define-public ecl-trivial-package-local-nicknames (sbcl-package->ecl-package sbcl-trivial-package-local-nicknames)) +(define-public sbcl-trivial-package-locks + (let ((commit "ca2e2b17124c7898942894383002313cea59486d") + (revision "0")) + (package + (name "sbcl-trivial-package-locks") + (version (git-version "0.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/yitzchak/trivial-package-locks") + (commit commit))) + (file-name (git-file-name "cl-trivial-package-locks" commit)) + (sha256 + (base32 "0kbyrkd7a9apyq83bl96jspjggjsswxh93111wrmpvhbnm2vll60")))) + (build-system asdf-build-system/sbcl) + (native-inputs (list sbcl-parachute)) + (home-page "https://github.com/yitzchak/trivial-package-locks") + (synopsis "Standard interface to the various package lock implementations") + (description + "This package provides a standard interface to the various package lock +implementations of Common Lisp.") + (license license:expat)))) + +(define-public cl-trivial-package-locks + (sbcl-package->cl-source-package sbcl-trivial-package-locks)) + +(define-public ecl-trivial-package-locks + (sbcl-package->ecl-package sbcl-trivial-package-locks)) + +(define-public clasp-trivial-package-locks + (sbcl-package->clasp-package sbcl-trivial-package-locks)) + (define-public sbcl-trivial-raw-io (let ((commit "b1a3c876305baa0dead419841de7b3e433a75867") (revision "1")) @@ -32394,6 +33418,37 @@ shader functions, written with @code{Shadow}.") (define-public cl-umbra (sbcl-package->cl-source-package sbcl-umbra)) +(define-public sbcl-universal-tween-engine + (let ((commit "a86d3c61ce6161d88996b055a292bb42469344ef") + (revision "0")) + (package + (name "sbcl-universal-tween-engine") + (version (git-version "1.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/bohonghuang/cl-universal-tween-engine") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "12bn21rslsmyp9y0y9s2hxivbzh7aajdbfvm3506k9x3yzlzvx7r")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-parachute)) + (inputs + (list sbcl-alexandria)) + (home-page "https://github.com/bohonghuang/cl-universal-tween-engine") + (synopsis "Common Lisp port of Universal Tween Engine") + (description "Common Lisp port of Universal Tween Engine.") + (license license:asl2.0)))) + +(define-public ecl-universal-tween-engine + (sbcl-package->ecl-package sbcl-universal-tween-engine)) + +(define-public cl-universal-tween-engine + (sbcl-package->cl-source-package sbcl-universal-tween-engine)) + (define-public sbcl-unix-opts (let ((commit "0e61f34b2ecf62288437810d4abb31e572048b04") (revision "1")) @@ -32970,7 +34025,7 @@ has a small codebase that's easy to understand and use.") (define-public sbcl-wayflan (package (name "sbcl-wayflan") - (version "0.0.4") + (version "0.1.0") (source (origin (method git-fetch) @@ -32979,7 +34034,7 @@ has a small codebase that's easy to understand and use.") (commit (string-append "v" version)))) (file-name (git-file-name "cl-wayflan" version)) (sha256 - (base32 "0y6hzskp1vgaigzj5b3i695sc6dn5mk7nlxs21nh5ybzmf4chhyy")))) + (base32 "11n8w4fh996gspgcsfhbrcmz7az4yrx9a15jh6n72kswgjzq0s5j")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-parachute)) @@ -33124,6 +34179,38 @@ or system names.") (define-public ecl-wild-package-inferred-system (sbcl-package->ecl-package sbcl-wild-package-inferred-system)) +(define-public sbcl-with-output-to-stream + (let ((commit "e94eec464d745e606cc84ea90027c26f93d032a3") + (revision "0")) + (package + (name "sbcl-with-output-to-stream") + (version (git-version "1.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/Hexstream/with-output-to-stream") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1cz96hrhf0csn0i8h7cvy54sb80d4w5ljkhpd5k7kr07p9555lqz")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-parachute)) + (home-page "https://github.com/Hexstream/with-output-to-stream") + (synopsis "Output to a stream according to the semantics of +FORMAT's stream argument") + (description "Provides a simple way of directing output to a stream +according to the concise and intuitive semantics of FORMAT's stream +argument.") + (license license:unlicense)))) + +(define-public ecl-with-output-to-stream + (sbcl-package->ecl-package sbcl-with-output-to-stream)) + +(define-public cl-with-output-to-stream + (sbcl-package->cl-source-package sbcl-with-output-to-stream)) + (define-public sbcl-with-user-abort (let ((commit "60693b4a1354faf17107ad6003b0b870cca37081") (revision "0")) @@ -33879,6 +34966,9 @@ This library aims to provide developers with more options.") (define-public ecl-zsort (sbcl-package->ecl-package sbcl-zsort)) +(define-public clasp-zsort + (sbcl-package->clasp-package sbcl-zsort)) + (define-public sbcl-zstd (let ((commit "134f058eee11512cf772a8d5b64364acf56a10b8") (revision "1")) |