buglet in `HANDLER-BIND'

[Sam S. <sd...@gn...>]

(block foo
  (handler-bind
    ((error #'(lambda (c) nil))
     (error #'(lambda (c) (return-from foo t))))
   (error "some")))

throws some error instead of returning T.

Bruno, how hard would it be to fix this bug?

PS you have not updated src/TODO for almost 2 years ...

-- 
Sam Steingold (http://www.podval.org/~sds)
Support Israel's right to defend herself! <http://www.i-charity.com/go/israel>
Read what the Arab leaders say to their people on <http://www.memri.org/>
If I had known that it was harmless, I would have killed it myself.