From 47f60d0996ed57d3a3c00b25ddbd8fea04096f90 Mon Sep 17 00:00:00 2001 From: Vincent Ambo Date: Wed, 22 Jan 2020 21:38:16 +0000 Subject: Squashed 'third_party/lisp/quasiquote_2/' content from commit cac90875d1 git-subtree-dir: third_party/lisp/quasiquote_2 git-subtree-split: cac90875d1f66e9385e559bfebafe6b7808b0930 --- macros.lisp | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 macros.lisp (limited to 'macros.lisp') diff --git a/macros.lisp b/macros.lisp new file mode 100644 index 000000000000..6ebeb47d081e --- /dev/null +++ b/macros.lisp @@ -0,0 +1,15 @@ + +(in-package #:quasiquote-2.0) + +(defmacro define-dig-like-macro (name) + `(defmacro ,name (n-or-form &optional (form nil form-p) &environment env) + (if (not form-p) + `(,',name 1 ,n-or-form) + (let ((*env* env)) + (transform-dig-form `(,',name ,n-or-form ,form)))))) + + +(define-dig-like-macro dig) +(define-dig-like-macro odig) + + -- cgit 1.4.1