X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Flambda-list.lisp;h=34f74191a15f70e968cf58fd821823aae2978324;hb=74568bb8cdadfcb6bf5429976b92f3afb748b0c2;hp=d706d50b8fa20b83b9e01e7daaaa5b820a649a77;hpb=84897abb2163b0de6d858267ade2fe06f3c3d946;p=jscl.git diff --git a/src/lambda-list.lisp b/src/lambda-list.lisp index d706d50..34f7419 100644 --- a/src/lambda-list.lisp +++ b/src/lambda-list.lisp @@ -338,7 +338,7 @@ ;;; defmacro to avoid a circularity. So just define the macro function ;;; explicitly. -#+common-lisp +#-jscl (defmacro !destructuring-bind (lambda-list expression &body body) (apply #'!expand-destructuring-bind lambda-list expression body))