aboutsummaryrefslogtreecommitdiff
path: root/src/interp/sys-driver.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-12-15 03:40:45 +0000
committerdos-reis <gdr@axiomatics.org>2010-12-15 03:40:45 +0000
commita03f99212855569fc0298734521a6468df4b2e00 (patch)
tree7bdce4387b43f27e285d07b08022a5ba34eea94f /src/interp/sys-driver.boot
parent683b15834757e0ccb39afe72bb46c4d644ce033e (diff)
downloadopen-axiom-a03f99212855569fc0298734521a6468df4b2e00.tar.gz
* boot/tokens.boot: canonicalFilename is now a builtin function.
* interp/sys-driver.boot (executeSpadScript): Announce input file.
Diffstat (limited to 'src/interp/sys-driver.boot')
-rw-r--r--src/interp/sys-driver.boot1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp/sys-driver.boot b/src/interp/sys-driver.boot
index fd08789b..6c9c3973 100644
--- a/src/interp/sys-driver.boot
+++ b/src/interp/sys-driver.boot
@@ -269,6 +269,7 @@ executeSpadScript(progname,options,file) ==
-- Accomodate for testsuite stream.
if testing then
set ["message","testing","on"]
+ sayKeyedMsg('S2IZ0100,[NAMESTRING canonicalFilename file])
CATCH($intCoerceFailure,
CATCH($SpadReaderTag,read [file]))
coreQuit (errorCount()> 0 => 1; 0)