aboutsummaryrefslogtreecommitdiff
path: root/src/interp/slam.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-02-10 04:48:39 +0000
committerdos-reis <gdr@axiomatics.org>2008-02-10 04:48:39 +0000
commit6b365f926f1f0430c34498392e1dddbff126bc48 (patch)
treebdbc548cea2b0968863d9695bbdfc1732b16c3c5 /src/interp/slam.boot
parent06e82157a75ebb6f14dae6a76a9e3a2b883b2c7a (diff)
downloadopen-axiom-6b365f926f1f0430c34498392e1dddbff126bc48.tar.gz
Add support for batch processing.
Diffstat (limited to 'src/interp/slam.boot')
-rw-r--r--src/interp/slam.boot3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interp/slam.boot b/src/interp/slam.boot
index 312dab36..0bc23423 100644
--- a/src/interp/slam.boot
+++ b/src/interp/slam.boot
@@ -241,7 +241,8 @@ compileRecurrenceRelation(op,nam,argl,junk,[body,sharpArg,n,:initCode]) ==
["ELT",["LIST",:initCode],["QSDIFFERENCE",n,sharpArg]]]
phrase5:= ['(QUOTE T),['recurrenceError,MKQ op,sharpArg]]
['PROGN,:preset,['COND,phrase1,phrase2,phrase3,phrase4,phrase5]]
- sayKeyedMsg("S2IX0001",[op])
+ if $verboseInterprerter then
+ sayKeyedMsg("S2IX0001",[op])
compileInteractive computeFunction
compileInteractive mainFunction
cacheType:= 'recurrence