diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 6 | ||||
| -rw-r--r-- | src/interp/i-toplev.boot | 1 | ||||
| -rw-r--r-- | src/interp/sys-os.boot | 2 |
3 files changed, 6 insertions, 3 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index c51f0c32..7c9636c6 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,11 @@ 2012-08-26 Gabriel Dos Reis <gdr@cs.tamu.edu> + * interp/sys-os.boot (flushStdout): Remove as unused. + * interp/i-toplev.boot (recordAndPrint): Do not print a newline + before formatting the result. + +2012-08-26 Gabriel Dos Reis <gdr@cs.tamu.edu> + * interp/debug.lisp: Remove reference to TOK and CHR. * interp/spad-parser.boot: Likewise. * interp/g-error.boot: Likewise. diff --git a/src/interp/i-toplev.boot b/src/interp/i-toplev.boot index 15a63bad..a1982eb9 100644 --- a/src/interp/i-toplev.boot +++ b/src/interp/i-toplev.boot @@ -194,7 +194,6 @@ recordAndPrint(x,md) == $outputMode: local := md --used by DEMO BOOT mode:= (md=$EmptyMode => quadSch(); md) if (md ~= $Void) or $printVoidIfTrue then - newlineIfDisplaying() if not $QuietCommand then output(x',md') putHist('%,'value,objNewWrap(x,md),$e) diff --git a/src/interp/sys-os.boot b/src/interp/sys-os.boot index 2095c14e..4a5ed497 100644 --- a/src/interp/sys-os.boot +++ b/src/interp/sys-os.boot @@ -175,8 +175,6 @@ import sock__send__wakeup: (int,int) -> int for sockSendWakeup import server__switch: () -> int for serverSwitch -import flush__stdout: () -> int for flushStdout - import sock__send__signal: (int,int) -> int for sockSendSignal --% |