diff options
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/server.boot | 1 | ||||
| -rw-r--r-- | src/interp/sys-constants.boot | 7 | ||||
| -rw-r--r-- | src/interp/sys-os.boot | 4 |
3 files changed, 3 insertions, 9 deletions
diff --git a/src/interp/server.boot b/src/interp/server.boot index e989fe80..0b206263 100644 --- a/src/interp/server.boot +++ b/src/interp/server.boot @@ -48,7 +48,6 @@ $sockBufferLength := 9217 serverReadLine(stream) == -- used in place of READ-LINE in a scratchpad server system. - flushOutput() not $SpadServer or not ioTerminal? stream => line := readLine stream line ~= %nothing => line diff --git a/src/interp/sys-constants.boot b/src/interp/sys-constants.boot index 017e5bb8..9f7d5223 100644 --- a/src/interp/sys-constants.boot +++ b/src/interp/sys-constants.boot @@ -662,11 +662,8 @@ $SessionManager == 1 $ViewportServer == 2 $MenuServer == 3 $SessionIO == 4 -$MessageServer == 5 -$InterpWindow == 6 -$KillSpad == 7 -$DebugWindow == 8 -$Forker == 9 +$InterpWindow == 5 +$KillSpad == 6 $CreateFrame == 1 $SwitchFrames == 2 diff --git a/src/interp/sys-os.boot b/src/interp/sys-os.boot index f4d4658f..2095c14e 100644 --- a/src/interp/sys-os.boot +++ b/src/interp/sys-os.boot @@ -1,4 +1,4 @@ --- Copyright (C) 2007-2011 Gabriel Dos Reis. +-- Copyright (C) 2007-2012 Gabriel Dos Reis. -- All rights reserved. -- -- Redistribution and use in source and binary forms, with or without @@ -179,8 +179,6 @@ import flush__stdout: () -> int for flushStdout import sock__send__signal: (int,int) -> int for sockSendSignal -import print__line: string -> int for printLine - --% import oa__system: string -> int for runCommand |