diff options
Diffstat (limited to 'src/interp/def.lisp')
-rw-r--r-- | src/interp/def.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/def.lisp b/src/interp/def.lisp index 146d65de..bce042cc 100644 --- a/src/interp/def.lisp +++ b/src/interp/def.lisp @@ -640,7 +640,7 @@ except that elements are separated by commas." (b (third COND-EXPR)) (c (fourth COND-EXPR))) (setq a (|new2OldTran| a) b (|new2OldTran| b) c (|new2OldTran| c)) - (cond ((EQ c '|noBranch|) `(if ,a ,b)) + (cond ((EQ c '|%noBranch|) `(if ,a ,b)) (t `(if ,a ,b ,c))))) (defun |newConstruct| (l) |