aboutsummaryrefslogtreecommitdiff
path: root/src/interp/debug.lisp
diff options
context:
space:
mode:
authorGabriel Dos Reis <gdr@axiomatics.org>2015-12-30 20:49:25 -0800
committerGabriel Dos Reis <gdr@axiomatics.org>2015-12-30 20:49:25 -0800
commita5676cf9d45c089a1f247c54e5f43309ca7aa2e4 (patch)
treeece00a9b6e5cac6e8c59d4d64591e47521f8875e /src/interp/debug.lisp
parentee728813cc4976058f52817a37f51c57a00773d2 (diff)
downloadopen-axiom-a5676cf9d45c089a1f247c54e5f43309ca7aa2e4.tar.gz
Thread database parameter through more compiler functions.
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)))