diff mbox series

[bug#57654,04/16] gnu: Add cl-object-class.

Message ID 20220908004904.27259-4-jgart@dismail.de
State Accepted
Headers show
Series [bug#57654,01/16] gnu: Add cl-canonicalized-initargs. | expand

Checks

Context Check Description
cbaines/applying patch fail View Laminar job
cbaines/issue success View issue

Commit Message

jgart Sept. 8, 2022, 12:48 a.m. UTC
* gnu/packages/lisp-xyz.scm (cl-object-class, ecl-object-class,
sbcl-object-class): New variables.
---
 gnu/packages/lisp-xyz.scm | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
diff mbox series

Patch

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index d354efe3fa..4aee6a1f1f 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -23381,6 +23381,38 @@  (define-public cl-enhanced-defclass
 (define-public ecl-enhanced-defclass
   (sbcl-package->ecl-package sbcl-enhanced-defclass))
 
+(define-public sbcl-object-class
+  (package
+      (name "sbcl-object-class")
+      (version "1.0")
+      (source
+        (origin
+          (method git-fetch)
+          (uri (git-reference
+                (url "https://github.com/Hexstream/object-class")
+                (commit (string-append "v" version))))
+          (file-name (git-file-name name version))
+          (sha256
+           (base32 "0qagmd2mxbr8b60l0y3jccj0maxjchds96p935pd3q805ry50683"))))
+      (build-system asdf-build-system/sbcl)
+      (native-inputs (list sbcl-parachute))
+      (inputs
+        (list sbcl-closer-mop
+              sbcl-enhanced-find-class
+              sbcl-compatible-metaclasses))
+      (home-page "https://www.hexstreamsoft.com/libraries/object-class/")
+      (synopsis "Cluster special subclasses of the standard-object")
+      (description
+"Ensures that special subclasses of standard-object cluster right in
+front of standard-object in the class precedence list.")
+      (license license:unlicense)))
+
+(define-public cl-object-class
+  (sbcl-package->cl-source-package sbcl-object-class))
+
+(define-public ecl-object-class
+  (sbcl-package->ecl-package sbcl-object-class))
+
 (define-public sbcl-smug
   (let ((commit "647a2428df297e1dd183ba7c19574bdb1320ae79")
         (revision "0"))