/[cmucl]/src/code/save.lisp
ViewVC logotype

Diff of /src/code/save.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.38 by dtc, Mon Oct 16 17:31:05 2000 UTC revision 1.39 by dtc, Sat Nov 4 17:05:56 2000 UTC
# Line 203  Line 203 
203                      (handler-case                      (handler-case
204                          (%restart-lisp)                          (%restart-lisp)
205                        (error (cond)                        (error (cond)
206                          (format *error-output* "Error in batch processing:~%~A"                          (format *error-output* "Error in batch processing:~%~A~%"
207                                  cond)                                  cond)
208                          (throw '%end-of-the-world 1)))                          (throw '%end-of-the-world 1)))
209                      (%restart-lisp))                      (%restart-lisp))

Legend:
Removed from v.1.38  
changed lines
  Added in v.1.39

  ViewVC Help
Powered by ViewVC 1.1.5