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

[no subject]

	 (cond ((null chnl) 
		(error '|-- Unknown or un-proceedable condition| condition))
	       ((or proceedable (not restartable))
		(error blurb cruft chnl))
	       ('T (*throw 'ERROR-RESTART () )))))

This code (from CERROR) is bogus:  Note that if the error is not proceedable,
but is restartable, it does the (*throw 'ERROR-RESTART () ) without ever going
into any form of error break.  Probably the best thing to do is to insert
(error blurb cruft chnl) before the *THROW.