Ignore:
Timestamp:
Mar 28, 2008, 8:27:06 AM (11 years ago)
Author:
gb
Message:

Default *PRINT-CATCH-ERRORS* to NIL, bind it to T in
%PRINT-CALL-HISTORY-INTERNAL (as in trunk.)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/level-1/l1-io.lisp

    r7749 r8919  
    224224(defvar *current-length* nil) ; must be nil at top level
    225225
    226 (defvar *print-catch-errors* t)
     226(defvar *print-catch-errors* nil)
    227227
    228228;;;; ======================================================================
Note: See TracChangeset for help on using the changeset viewer.