diff options
Diffstat (limited to 'src/interp/int-top.boot')
| -rw-r--r-- | src/interp/int-top.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/int-top.boot b/src/interp/int-top.boot index a200fc17..2c1cb0ed 100644 --- a/src/interp/int-top.boot +++ b/src/interp/int-top.boot @@ -44,7 +44,7 @@ ncParseFromString s == zeroOneTran packageTran CATCH($SpadReaderTag, parseFromString s) ncINTERPFILE(file, echo) == - $EchoLines: local := echo + $Echo: local := echo $ReadingFile: local := true SpadInterpretFile file @@ -199,7 +199,7 @@ intloopEchoParse s== [dq,stream]:=first s [lines,rest]:=ncloopDQlines(dq,$lines) setCurrentLine(mkLineList(lines)) - if $EchoLines then ncloopPrintLines lines + if $Echo then ncloopPrintLines lines $lines:=rest [[[lines,npParse dqToList dq]],:rest s] |