aboutsummaryrefslogtreecommitdiff
path: root/src/interp/g-error.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/g-error.boot')
-rw-r--r--src/interp/g-error.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/g-error.boot b/src/interp/g-error.boot
index 60eab314..f5e6d17d 100644
--- a/src/interp/g-error.boot
+++ b/src/interp/g-error.boot
@@ -104,7 +104,7 @@ errorSupervisor1(errorType,errorMsg,$BreakMode) ==
handleLispBreakLoop($BreakMode)
handleLispBreakLoop($BreakMode) ==
- TERPRI()
+ finishLine $OutputStream
$BreakMode = 'break =>
sayBrightly '" "
BREAK()