/[gcl]/gcl/pcl/macros.lisp
ViewVC logotype

Diff of /gcl/pcl/macros.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.1.1 by camm, Mon Jun 17 05:24:18 2002 UTC revision 1.2 by camm, Fri Oct 25 02:41:49 2002 UTC
# Line 208  Line 208 
208  ;;; Common Lisp BUG:  ;;; Common Lisp BUG:
209  ;;;    Common Lisp should have destructuring-bind.  ;;;    Common Lisp should have destructuring-bind.
210  ;;;      ;;;    
211  (defmacro destructuring-bind (pattern form &body body)  ;#-gcl
212    ; FIXME use regular destructuring-bind
213    (defmacro pcl-destructuring-bind (pattern form &body body)
214    (multiple-value-bind (ignore declares body)    (multiple-value-bind (ignore declares body)
215        (extract-declarations body)        (extract-declarations body)
216      (declare (ignore ignore))      (declare (ignore ignore))

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26