diff options
| author | dos-reis <gdr@axiomatics.org> | 2012-05-07 20:17:48 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2012-05-07 20:17:48 +0000 |
| commit | d521a65ba712bf80f5bb6677e04d6a5ab36a42a6 (patch) | |
| tree | 526828111f15df0a4bab047326fda317ae333a87 /src/interp/diagnostics.boot | |
| parent | 171ca9c9ca0ae4c58c5c25c51122c662b0cafe02 (diff) | |
| download | open-axiom-d521a65ba712bf80f5bb6677e04d6a5ab36a42a6.tar.gz | |
* interp/vmlisp.lisp (ioTerminal?): Rename form IS-CONSOLE.
* interp/bootlex.lisp: Adjust.
* interp/diagnostics.boot: Likewise.
* interp/macros.lisp: Likewise.
* interp/msgdb.boot: Likewise.
* interp/parsing.lisp: Likewise.
* interp/preparse.lisp: Likewise.
* interp/server.boot: Likewise.
Diffstat (limited to 'src/interp/diagnostics.boot')
| -rw-r--r-- | src/interp/diagnostics.boot | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/diagnostics.boot b/src/interp/diagnostics.boot index ecaf9c7c..bb7cd4ff 100644 --- a/src/interp/diagnostics.boot +++ b/src/interp/diagnostics.boot @@ -1,6 +1,6 @@ -- Copyright (c) 1991-2002, The Numerical ALgorithms Group Ltd. -- All rights reserved. --- 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 @@ -128,14 +128,14 @@ sayBrightly1(x,out) == sayBrightlyNT(x,out == $OutputStream) == x = nil => nil $sayBrightlyStream ~= nil => sayBrightlyNT1(x,$sayBrightlyStream) - IS_-CONSOLE out => sayBrightlyNT1(x,out) + ioTerminal? out => sayBrightlyNT1(x,out) sayBrightly1(x,out) => sayBrightlyNT1(x,out) nil sayBrightly(x,out == $OutputStream) == x = nil => nil $sayBrightlyStream ~= nil => sayBrightly1(x,$sayBrightlyStream) - IS_-CONSOLE out => sayBrightly1(x,out) + ioTerminal? out => sayBrightly1(x,out) sayBrightly1(x,out) => sayBrightly1(x,$OutputStream) nil |