diff options
| author | Baggers <chris.bagley@gmail.com> | 2016-12-29 14:22:14 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2016-12-29 14:22:14 +0100 |
| commit | 7eb180c4cd74e3bbcba536bcfa97fd620a0e3b0e (patch) | |
| tree | ad33bda169542b5891cc23f9d12772fb72d57b3c | |
| parent | a28963efb0ebbfefb04ea43b9fa31caad47a61b1 (diff) | |
| parent | 7daa2936631c37f1bbec0e40f0eff39953c798ab (diff) | |
Merge pull request #1 from 38a938c2/add-ecl
Add ECL support
| -rw-r--r-- | trivial-macroexpand-all.lisp | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/trivial-macroexpand-all.lisp b/trivial-macroexpand-all.lisp index 5dd5e77..e2c7064 100644 --- a/trivial-macroexpand-all.lisp +++ b/trivial-macroexpand-all.lisp @@ -30,6 +30,10 @@ (declare (ignore env)) (ccl:macroexpand-all form)) +#+ecl +(defun macroexpand-all (form &optional env) + (walker:macroexpand-all form env)) + #+lispworks (defun macroexpand-all (form &optional env) (declare (ignore env)) @@ -49,7 +53,7 @@ (declare (ignore env)) (macroexpand form)) -#-(or abcl allegro ccl clisp cmucl corman lispworks mkcl sbcl scl) +#-(or abcl allegro ccl clisp cmucl corman ecl lispworks mkcl sbcl scl) (defun macroexpand-all (form &optional env) (declare (ignore env)) (warn "trivial-macroexpand-all is not currently available for this implementation") |