diff options
author | dos-reis <gdr@axiomatics.org> | 2012-08-26 08:44:18 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2012-08-26 08:44:18 +0000 |
commit | 8366d3d32cb2b36e6b72bc0379514250256db384 (patch) | |
tree | d8b80c39a657c9d1ac7c4380235b9a6bcf59a4ce /src/interp | |
parent | e4d0798fd570256bd6d399ce714fe55293044da6 (diff) | |
download | open-axiom-8366d3d32cb2b36e6b72bc0379514250256db384.tar.gz |
* include/sockio.h (init_purpose_table): Remove declaration.
(redirect_stdio): Likewise.
(init_socks): Likewise.
(flush_stdout): Likewise.
(print_line): Likewise.
(BaloonServer): Remove.
(DebugWindow): Likewise.
(Forker): Likewise.
(AV): Likewise.
* interp/server.boot (serverReadLine): Do not flushOutput.
* interp/sys-constants.boot ($MessageServer): Remove.
($DebugWindow): Likewise.
($Forker): Likewise.
* interp/sys-os.boot (printLine): Remove associated foreign import.
* lib/sockio-c.c (init_purpose_table): Do not export.
(init_socks): Likewise.
(get_socket_type): Simplify. Remove dead code.
(redirect_stdio): Remove.
(flush_stdio): Likewise.
(print_line): Likewise.
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 |