diff options
| author | Vincent Ambo <tazjin@google.com> | 2020-01-22T21·38+0000 |
|---|---|---|
| committer | Vincent Ambo <tazjin@google.com> | 2020-01-22T21·38+0000 |
| commit | 47f60d0996ed57d3a3c00b25ddbd8fea04096f90 (patch) | |
| tree | 809e91ff493b17ef82e6e0de81e1eb7fbb33ec7b /macros.lisp | |
Squashed 'third_party/lisp/quasiquote_2/' content from commit cac90875d1
git-subtree-dir: third_party/lisp/quasiquote_2 git-subtree-split: cac90875d1f66e9385e559bfebafe6b7808b0930
Diffstat (limited to 'macros.lisp')
| -rw-r--r-- | macros.lisp | 15 |
1 files changed, 15 insertions, 0 deletions
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) + + |