Add ECL support

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")