[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
DESETQ totally broken
- To: (BUG LISP) at MIT-MC
- Subject: DESETQ totally broken
- From: RWK,SJOBRG at MIT-MC
- Date: Sat, 15 Sep 79 13:11:00 GMT
- Original-date: 15 SEP 1979 0911-EDT
- Sent-by: RWK at MIT-MC
(MACROEXPAND '(DESETQ X X)) =
((LAMBDA (NIL NIL) (SETQ DESETQ X) (SETQ X NIL)) NIL NIL)
(MACROEXPAND '(DESETQ X (X))) =
((LAMBDA (NIL NIL) (SETQ DESETQ X)) NIL NIL)
This also breaks the OPTIONAL-P feature of DEFMACRO. Maybe DEFUN& to, although
I haven't checked.