aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages
diff options
context:
space:
mode:
authorPierre Neidhardt <mail@ambrevar.xyz>2022-06-30 17:47:10 +0200
committerPierre Neidhardt <mail@ambrevar.xyz>2022-06-30 20:01:37 +0200
commit3c509d98eddeb205636a5f8c88ac83b08e43934a (patch)
treea6cd9b7496494329a299e128d35d3ac8485c34d3 /gnu/packages
parentd1bb3bab4b826a12f09b4a434c16fac158ea6c3c (diff)
downloadguix-3c509d98eddeb205636a5f8c88ac83b08e43934a.tar.gz
guix-3c509d98eddeb205636a5f8c88ac83b08e43934a.zip
gnu: Add slot-extra-options.
* gnu/packages/lisp-xyz.scm (cl-slot-extra-options, ecl-slot-extra-options, sbcl-slot-extra-options): New variables.
Diffstat (limited to 'gnu/packages')
-rw-r--r--gnu/packages/lisp-xyz.scm42
1 files changed, 42 insertions, 0 deletions
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 940925174a..6edbbeb7be 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -22040,3 +22040,45 @@ to dispatch on the basis of types rather than classes.")
(define-public ecl-polymorphic-functions
(sbcl-package->ecl-package sbcl-polymorphic-functions))
+
+(define-public sbcl-slot-extra-options
+ (let ((commit "29517d980325cd63744f1acf4cfe5c8ccec2b318"))
+ (package
+ (name "sbcl-slot-extra-options")
+ (version (git-version "1.1.1" "1" commit))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/some-mthfka/slot-extra-options/")
+ (commit commit)))
+ (file-name (git-file-name "cl-slot-extra-options" version))
+ (sha256
+ (base32 "1b2swhjjs0w1034cy045q8l3ndmci7rjawka39q23vncy6d90497"))))
+ (build-system asdf-build-system/sbcl)
+ (inputs
+ (list sbcl-alexandria
+ sbcl-closer-mop
+ sbcl-serapeum
+ sbcl-iterate))
+ (native-inputs
+ (list sbcl-parachute))
+ (home-page "https://github.com/some-mthfka/slot-extra-options/")
+ (synopsis "Extra options for slots using MOP")
+ (description
+ "This library lets you build a metaclass which in turn lets you specify
+extra slot options in its classes. Options may be easily inspected and custom
+inheritence may be set up. The Meta-Object Protocol (MOP) is used for the
+implementation - through @code{closer-mop}. Some convenience function for
+processing slot options are also available.
+
+Possible use case: you want to automatically set up some definitions based on
+some slots, but you want to have control over it right in the class
+definition.")
+ (license license:lgpl3+))))
+
+(define-public cl-slot-extra-options
+ (sbcl-package->cl-source-package sbcl-slot-extra-options))
+
+(define-public ecl-slot-extra-options
+ (sbcl-package->ecl-package sbcl-slot-extra-options))