aboutsummaryrefslogtreecommitdiff
path: root/src/interp/server.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2012-08-26 00:43:37 +0000
committerdos-reis <gdr@axiomatics.org>2012-08-26 00:43:37 +0000
commit8e50d849f23a839f2410cc388f97ee2dc4c76786 (patch)
treee6c45fe393f6d44eb08862126052ca3d0ca48f52 /src/interp/server.boot
parent14a4b85c2ae0836b9020b2c28d0232d206d69fe8 (diff)
downloadopen-axiom-8e50d849f23a839f2410cc388f97ee2dc4c76786.tar.gz
* interp/i-util.boot: Lose paramater. Unconditional flush the
output stream. Adjust callers.
Diffstat (limited to 'src/interp/server.boot')
-rw-r--r--src/interp/server.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/server.boot b/src/interp/server.boot
index 6206169e..e989fe80 100644
--- a/src/interp/server.boot
+++ b/src/interp/server.boot
@@ -90,7 +90,7 @@ serverReadLine(stream) ==
stringBuf := sockGetString $MenuServer
CATCH('coerceFailure,CATCH($intTopLevel, CATCH($SpadReaderTag,
parseAndInterpret stringBuf)))
- not $leanMode and printPrompt "andFlush"
+ not $leanMode and printPrompt()
action = $NonSmanSession =>
$SpadServer := nil
action = $KillLispSystem =>