aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compat.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-03-25 21:33:58 +0000
committerdos-reis <gdr@axiomatics.org>2008-03-25 21:33:58 +0000
commit68c6afce19df6a92b0569a23bcfe3a73f109b754 (patch)
tree4091c71856bf51388d07c677191ba13d2457128a /src/interp/compat.boot
parentdaed04c57b8ff8c3be53a5a183635c5687ab7bf6 (diff)
downloadopen-axiom-68c6afce19df6a92b0569a23bcfe3a73f109b754.tar.gz
* interp/bootlex.lisp: Import "sys-globals".
Consistently use $InputStream and $OutputStream for I/O. * interp/c-util.boot: Likewise. * interp/comp.lisp: Likewise. * interp/compat.boot: Likewise. * interp/debug.lisp: Likewise. * interp/def.lisp: Likewise. * interp/g-error.boot: Likewise. * interp/i-toplev.boot: Likewise. * interp/int-top.boot: Likewise. * interp/intfile.boot: Likewise. * interp/lisplib.boot: Likewise. * interp/macros.lisp: Likewise. * interp/metalex.lisp: Likewise. * interp/msgdb.boot: Likewise. * interp/patches.lisp: Likewise. * interp/preparse.lisp: Likewise. * interp/server.boot: Likewise. * interp/spad-parser.boot: Likewise. * interp/spad.lisp: Likewise. * interp/sys-globals.boot: Likewise. * interp/sys-macros.lisp: Likewise. * interp/sys-os.boot: Likewise. * interp/unlisp.lisp: Likewise. * interp/vmlisp.lisp: Likewise. * interp/Makefile.pamphlet (bootlex.$(FASLEXT)): Require sys-globals.$(FASLEXT) too. (vmlisp.$(FASLEXT)): Likewise.
Diffstat (limited to 'src/interp/compat.boot')
-rw-r--r--src/interp/compat.boot8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/interp/compat.boot b/src/interp/compat.boot
index 87e1227c..0288ab68 100644
--- a/src/interp/compat.boot
+++ b/src/interp/compat.boot
@@ -1,6 +1,6 @@
--- Copyright (c) 1991-2002, The Numerical ALgorithms Group Ltd.
+-- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd.
-- All rights reserved.
--- Copyright (C) 2007, Gabriel Dos Reis.
+-- Copyright (C) 2007-2008, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -15,7 +15,7 @@
-- the documentation and/or other materials provided with the
-- distribution.
--
--- - Neither the name of The Numerical ALgorithms Group Ltd. nor the
+-- - Neither the name of The Numerical Algorithms Group Ltd. nor the
-- names of its contributors may be used to endorse or promote products
-- derived from this software without specific prior written permission.
--
@@ -81,5 +81,5 @@ makeBigFloat(mantissa,expon) ==
READLINE(:s) ==
s => read_-line(first s)
- read_-line(_*STANDARD_-INPUT_*)
+ read_-line($InputStream)