aboutsummaryrefslogtreecommitdiff
path: root/src/interp/comp.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/comp.lisp')
-rw-r--r--src/interp/comp.lisp6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/comp.lisp b/src/interp/comp.lisp
index 870bcb63..f2bb2a91 100644
--- a/src/interp/comp.lisp
+++ b/src/interp/comp.lisp
@@ -94,7 +94,7 @@
(|$OutputStream|
(if |$InteractiveMode|
(make-broadcast-stream)
- (make-synonym-stream *standard-output*))))
+ (make-synonym-stream '*standard-output*))))
(COMP fn)))
#-:CCL
@@ -103,7 +103,7 @@
;; following creates a null outputstream if $InteractiveMode
(|$OutputStream|
(if |$InteractiveMode| (make-broadcast-stream)
- (make-synonym-stream *standard-output*))))
+ (make-synonym-stream '*standard-output*))))
(COMPILE-FILE fn)))
#+:CCL
@@ -165,7 +165,7 @@
(|$OutputStream|
(if |$InteractiveMode|
(make-broadcast-stream)
- (make-synonym-stream *standard-output*))))
+ (make-synonym-stream '*standard-output*))))
(COMP370 fn)))
(defun COMP-1 (X)