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 fdd725b4..73f32cb6 100644
--- a/src/interp/debug.lisp
+++ b/src/interp/debug.lisp
@@ -1096,7 +1096,7 @@ EXAMINE (SETQ RECNO (NOTE |$InputStream|))
; by having no transform for the 3rd argument, it is simply not printed
-(MAKEPROP '|compFormWithModemap| '/TRANSFORM '(& * * & *))
+(MAKEPROP '|compFormWithModemap| '/TRANSFORM '(& & * * & *))
(defun UNVEC (X)
(COND ((simple-vector-p X) (CONS '$ (VEC_TO_TREE X)))