diff options
| author | dos-reis <gdr@axiomatics.org> | 2007-09-11 21:07:16 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2007-09-11 21:07:16 +0000 |
| commit | 491eda903e80958a28a53d36688a65911a0d2978 (patch) | |
| tree | 1873d9ba76f9691edc973c8dbf7e9ad878318b30 /src/interp/interop.boot.pamphlet | |
| parent | b9eed452db6231458c941041b7090c0e62426eae (diff) | |
| download | open-axiom-491eda903e80958a28a53d36688a65911a0d2978.tar.gz | |
* template.boot: New.
* template.boot.pamphlet: Move content to template.boot. Remove.
* termrw.boot: New.
* termrw.boot.pamphlet: Move content to template.boot. Remove.
* topics.boot: New.
* topics.boot.pamphlet: Move content to topics.boot. Remove.
* trace.boot: New.
* trace.boot.pamphlet: Move content to trace.boot. Remove.
* varini.boot: New.
* varini.boot.pamphlet: Move content to varini.boot. Remove.
* xrun.boot: New.
* xrun.boot.pamphlet: Move content to xrun.boot. Remove
* xruncomp.boot: New.
* xruncomp.boot.pamphlet: Move content to xruncomp.boot. Remove.
* Makefile.pamphlet (<<xruncomp.clisp>>): Remove.
(<<trace.lisp>>): Likewise.
(<<topics.clisp>>): Likewise.
(<<template.clisp>>): Likewise.
(<<termrw.clisp>>): Likewise.
Diffstat (limited to 'src/interp/interop.boot.pamphlet')
| -rw-r--r-- | src/interp/interop.boot.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/interop.boot.pamphlet b/src/interp/interop.boot.pamphlet index 4d346313..88d4e560 100644 --- a/src/interp/interop.boot.pamphlet +++ b/src/interp/interop.boot.pamphlet @@ -619,7 +619,7 @@ hashNewLookupInTable(op,sig,dollar,[domain,opvec],flag) == start := QSPLUS(start,QSPLUS(numTableArgs,4)) (success ^= 'failed) and success => if $monitorNewWorld then - sayLooking1('"<----",uu) where uu == + sayLooking1('"<----",uu) where uu() == PAIRP success => [first success,:devaluate rest success] success success |