aboutsummaryrefslogtreecommitdiff
path: root/src/interp/spad.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2013-05-30 16:51:52 +0000
committerdos-reis <gdr@axiomatics.org>2013-05-30 16:51:52 +0000
commit2bc4e76b440ada98326241b3b01147fc121eb99f (patch)
tree9f92051129358ba0ff0f132cd6a68bbf7fb4aa8e /src/interp/spad.lisp
parentce064a60f567c2938290d02f2de56abbeff17b57 (diff)
downloadopen-axiom-2bc4e76b440ada98326241b3b01147fc121eb99f.tar.gz
Update for modern ECL.
Diffstat (limited to 'src/interp/spad.lisp')
-rw-r--r--src/interp/spad.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/spad.lisp b/src/interp/spad.lisp
index 22e01ef0..2f4161e5 100644
--- a/src/interp/spad.lisp
+++ b/src/interp/spad.lisp
@@ -95,7 +95,7 @@
(|parseNewExpr| rd)
(let ((parseout (|popStack1|)) )
(when parseout
- (|translateSpad| parseout)
+ (|translateSpad| ifile parseout)
(format |$OutputStream| "~&")))
))))
(|ioClear!| rd)))