From fc7a747947a7d506bbbcd7ce3cf4f213d5d60da1 Mon Sep 17 00:00:00 2001
From: charje <charles.b.jackson@protonmail.com>
Date: Fri, 10 Oct 2025 18:06:53 +0000
Subject: [PATCH] gnu: Add sbcl-common-macros.

* gnu/packages/lisp-xyz.scm (sbcl-common-macros, cl-common-macros,
ecl-common-macros, clasp-common-macros): New Variables.

Change-Id: I01cee761f4ac59705431e138c87c125553261099
Signed-off-by: jgart <jgart@dismail.de>
---
 gnu/packages/lisp-xyz.scm | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 4dd416a926a9321306302e3ad16e2d7df255bb82..61741f85cc5cde75eac8d5844750fe101ba41444 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -840,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")