X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Flambda-list.lisp;h=34f74191a15f70e968cf58fd821823aae2978324;hb=74568bb8cdadfcb6bf5429976b92f3afb748b0c2;hp=513e4f4b3b205439eaabed3e5fdfa081c709ef24;hpb=53324031bdaab640743f780492d7e31d4d195c60;p=jscl.git

diff --git a/src/lambda-list.lisp b/src/lambda-list.lisp
index 513e4f4..34f7419 100644
--- a/src/lambda-list.lisp
+++ b/src/lambda-list.lisp
@@ -1,5 +1,7 @@
 ;;; lambda-list.lisp --- Lambda list parsing and destructuring
 
+;;; Copyright (C) 2013 David Vazquez
+
 ;; JSCL is free software: you can redistribute it and/or
 ;; modify it under the terms of the GNU General Public License as
 ;; published by the Free Software Foundation, either version 3 of the
@@ -336,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))