summaryrefslogtreecommitdiff
path: root/Core/extended-output/output-stream.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'Core/extended-output/output-stream.lisp')
-rw-r--r--Core/extended-output/output-stream.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/Core/extended-output/output-stream.lisp b/Core/extended-output/output-stream.lisp
index 3377595d..9153ebf7 100644
--- a/Core/extended-output/output-stream.lisp
+++ b/Core/extended-output/output-stream.lisp
@@ -222,7 +222,7 @@
(setf (cursor-offset cursor) (values bx by))
(setf (cursor-extent cursor) (values ex ey))
(seos-record-output stream vector start split)
- (when (/= split end)
+ (when (and split (/= split end))
(go :break-line))))))