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

UNWIND-PROTECT



On the 15th of Feb, KMP sent out a bug notice about UNWIND-PROTECT
losing, for which I made the diagnosis  that ERRSET was not saving
and restoring the UNREAL flag.  The test case is
 (DEFUN KMP-LOSES () (ERRSET (UNWIND-PROTECT NIL (OPEN '((DSK BOO) BAR BZ)))))
Well, I found  a way to fix ERRSET without taking more pdl positions,
and the assembled code (already initialized)  is on LISP;BBLISP 995QIO.
If that really works, then we should dump this out as XLISP, and
maybe think about holding off on the extended definition of WITHOUT-
INTERRUPTS - i.e., merely go back for now to using the "clean-up"
clauses of an UNWIND-PROTECT.
  Also, you will note that this new lisp (1995) has LEXPR-FUNCALL.
Comments solicited.