aboutsummaryrefslogtreecommitdiff
path: root/src/interp/server.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-30 18:55:21 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-30 18:55:21 +0000
commit42cf0984b569e49060252e536c0c7e7aee469873 (patch)
treec2cb31c68df04f75bfd9a490ae10b9c6cf795102 /src/interp/server.boot
parent5770442f576aa0c1e389344a636f1e4edca1b136 (diff)
downloadopen-axiom-42cf0984b569e49060252e536c0c7e7aee469873.tar.gz
* More cleanup
Diffstat (limited to 'src/interp/server.boot')
-rw-r--r--src/interp/server.boot6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/server.boot b/src/interp/server.boot
index dff51876..6e73a06a 100644
--- a/src/interp/server.boot
+++ b/src/interp/server.boot
@@ -52,7 +52,7 @@ serverReadLine(stream) ==
not $SpadServer or not IS_-CONSOLE stream =>
read_-line(stream)
IN_-STREAM: fluid := stream
- _*EOF_*: fluid := NIL
+ _*EOF_*: fluid := nil
line :=
while not $EndServerSession and not _*EOF_* repeat
if $NeedToSignalSessionManager then
@@ -153,11 +153,11 @@ parseAndEvalStr string ==
parseAndEvalStr1 string ==
string.0 = char ")" =>
doSystemCommand subSequence(string, 1)
- processInteractive(ncParseFromString string, NIL)
+ processInteractive(ncParseFromString string, nil)
protectedEVAL x ==
error := true
- val := NIL
+ val := nil
try
val := eval x
error := false