aboutsummaryrefslogtreecommitdiff
path: root/src/interp/g-util.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-02-20 17:24:05 +0000
committerdos-reis <gdr@axiomatics.org>2008-02-20 17:24:05 +0000
commit7ba4cd656138bedb567137ea662f26213bc2e898 (patch)
treedffa37ee129563ce966d52514ec6deb569794d9b /src/interp/g-util.boot
parent9fbb89443e0c88ee5e76d95a3eea2ac5ea9916b6 (diff)
downloadopen-axiom-7ba4cd656138bedb567137ea662f26213bc2e898.tar.gz
* lisp/core.lisp.in [SBCL]: Require "sb-posix".
(|resetErrorCount|): New export function. * interp/vmlisp.lisp (opOf): Remove macro definition. * interp/msg.boot (setMsgCatlessAttr): Fix thinko. * interp/monitor.lisp (monitor-add): Remove extra right parenthesis. * interp/lisplib.boot: Import "debug". (initializeLisplib): Don't use ERRORS variable. * interp/i-spec1.boot (isDomainValuedVariable): Tidy. * interp/i-output.boot (outputTran): Use SIZE instead of #. (output): Remove misguided conversion from Tuple to List. * interp/i-coerce.boot (coerceInteractive): Allow domain object convesions. * interp/g-util.boot (opOf): Declare. * interp/Makefile.pamphlet (lisplib.$(FASLEXT)): Depend on debug.$(FASLEXT). * algebra/Makefile.pamphlet: Use .$(FASLEXT) instead of hardcoded .o extension.
Diffstat (limited to 'src/interp/g-util.boot')
-rw-r--r--src/interp/g-util.boot1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp/g-util.boot b/src/interp/g-util.boot
index ca50a4e5..272ad517 100644
--- a/src/interp/g-util.boot
+++ b/src/interp/g-util.boot
@@ -514,6 +514,7 @@ str2Tex s ==
val := objValUnwrap val
CAR val.1
+opOf: %Thing -> %Thing
opOf x ==
atom x => x
first x