aboutsummaryrefslogtreecommitdiff
path: root/src/interp/debug.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/debug.lisp')
-rw-r--r--src/interp/debug.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/debug.lisp b/src/interp/debug.lisp
index a9ca2349..7e409ff3 100644
--- a/src/interp/debug.lisp
+++ b/src/interp/debug.lisp
@@ -720,7 +720,7 @@ EXAMINE (SETQ RECNO (NOTE |$InputStream|))
(T (COND (|$mathTrace| (TERPRI)))
(PRINMATHOR0 VAL CURSTRM)))))))
-(DEFUN MONITOR-BLANKS (N) (PRINC (MAKE-FULL-CVEC N " ") CURSTRM))
+(DEFUN MONITOR-BLANKS (N) (PRINC (|makeString| N (|char| " ")) CURSTRM))
(DEFUN MONITOR-EVALBEFORE (X) (EVAL (MONITOR-EVALTRAN X NIL)) X)