[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

unwind-protect

What is the result of this code:

(proclaim '(special *foo*))

(let* ((x 'good)
       (*foo* x))
  (block bar
    (unwind-protect
      (let ((*foo* 'bad))
        (return-from bar))
      (setq x *foo*)))
  x)

The Zetalisp manual says it will return GOOD, but the silver book is
silent on the issue.  This should be clarified.

	Pavel