aboutsummaryrefslogtreecommitdiff
path: root/src/interp/sys-driver.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/sys-driver.boot')
-rw-r--r--src/interp/sys-driver.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/sys-driver.boot b/src/interp/sys-driver.boot
index b9b0739c..4c98c8e2 100644
--- a/src/interp/sys-driver.boot
+++ b/src/interp/sys-driver.boot
@@ -252,7 +252,7 @@ executeSpadScript(progname,options,file) ==
$ProcessInteractiveValue := true
$PrintCompilerMessageIfTrue := $verbose
CATCH($intCoerceFailure,
- CATCH($intSpadReader,read [file]))
+ CATCH($SpadReaderTag,read [file]))
coreQuit (errorCount()> 0 => 1; 0)
associateRequestWithFileType(Option '"script", '"input",
@@ -269,7 +269,7 @@ compileSpadLibrary(progname,options,file) ==
$PrintCompilerMessageIfTrue := $verbose
CATCH($intTopLevel,
CATCH("SpadCompileItem",
- CATCH($intSpadReader,compiler [file])))
+ CATCH($SpadReaderTag,compiler [file])))
coreQuit (errorCount()> 0 => 1; 0)
associateRequestWithFileType(Option '"compile", '"spad",