Ticket #867 (closed defect: invalid)
do tries to iterate into print output?
|Reported by:||mars0i||Owned by:|
|Component:||ANSI CL Compliance||Version:||1.6|
|Keywords:||do symbol-plist plist printing||Cc:|
Description (last modified by gb) (diff)
Is this a known bug? I don't have the expertise to describe the problem in a sensible way--I'm not even sure whether it has to do with 'do' per se--but you'll see what I mean. This is on: 1.6-r14468M (DarwinX8664)!
Line breaks added for readability:
? (setf (get 'sym1 'prop) '(this that theother)) (THIS THAT THEOTHER) ? (setf sym2 'sym1) SYM1 ? (do ((lst (symbol-plist 'sym1) (cdr lst))) ((null lst) t) (princ (car lst))) PROP(THIS THAT THEOTHER) T ? (do ((lst (symbol-plist sym2) (cdr lst))) ((null lst) t) (princ (car lst))) ;Compiler warnings : ; In an anonymous lambda form at position 24: Undeclared free variable SYM2PROP(THIS THAT THEOTHER) T ?
Thank you for ccl, btw. It seems incredibly fast, which matters for my application.