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