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 949b3241..9554b7b5 100644 --- a/src/interp/int-top.boot +++ b/src/interp/int-top.boot @@ -235,7 +235,7 @@ intloopSpadProcess(stepNo,lines,ptree,interactive?)== ncConversationPhase(function phIntReportMsgs,[cc, interactive?]) ncConversationPhase(function phInterpret, [cc]) - #ncEltQ(cc, 'messages) ^= 0 => ncError() + #ncEltQ(cc, 'messages) ~= 0 => ncError() intSetNeedToSignalSessionManager() $prevCarrier := $currentCarrier @@ -272,7 +272,7 @@ mkLineList lines == nonBlank str == value := false for i in 0..MAXINDEX str repeat - str.i ^= char " " => + str.i ~= char " " => value := true return value value |