Custom Query (1030 matches)

Add documentation for JOIN-PROCESS (see ccl:level-1;l1-processes.lisp)

Hi,

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.

Marshall

(/ (1+ most-positive-fixnum) 0) => 1/0

This should signal a DIVISION-BY-ZERO condition.