Raymond Toy pushed to branch issue-139-set-filename-encoding-to-utf8 at cmucl / cmucl
Commits:
-
ff4edca1
by Raymond Toy at 2022-12-21T11:50:01-08:00
1 changed file:
Changes:
| ... | ... | @@ -373,14 +373,14 @@ |
| 373 | 373 | (unix:unix-exit
|
| 374 | 374 | (catch '%end-of-the-world
|
| 375 | 375 | (unwind-protect
|
| 376 | - (if *batch-mode*
|
|
| 377 | - (handler-case
|
|
| 378 | - (%restart-lisp)
|
|
| 379 | - (error (cond)
|
|
| 380 | - (format *error-output* (intl:gettext "Error in batch processing:~%~A~%")
|
|
| 381 | - cond)
|
|
| 382 | - (throw '%end-of-the-world 1)))
|
|
| 383 | - (%restart-lisp))
|
|
| 376 | + (if *batch-mode*
|
|
| 377 | + (handler-case
|
|
| 378 | + (%restart-lisp)
|
|
| 379 | + (error (cond)
|
|
| 380 | + (format *error-output* (intl:gettext "Error in batch processing:~%~A~%")
|
|
| 381 | + cond)
|
|
| 382 | + (throw '%end-of-the-world 1)))
|
|
| 383 | + (%restart-lisp))
|
|
| 384 | 384 | (finish-standard-output-streams))))))
|
| 385 | 385 | |
| 386 | 386 | ;; Record dump time and host
|