diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-02-16 04:52:45 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-02-16 04:52:45 +0000 |
| commit | 406b6c0a38ee0e9ea1ba6657b76391f1c15f0b95 (patch) | |
| tree | c05aaf09c7745fdf0d562d8664bc8fddab64befd /src/interp/sys-utility.boot | |
| parent | 5505ab2d0069eb2809753217a93e9a4551c997f9 (diff) | |
| download | open-axiom-406b6c0a38ee0e9ea1ba6657b76391f1c15f0b95.tar.gz | |
* interp/unlisp.lisp (|CatchAsCan|): Tidy.
* interp/sys-utility.boot (delete): Fix thinko.
* interp/sys-globals.boot ($sourceFiles): Define here.
(INPUTSTREAM): Likewise.
* interp/i-syscmd.boot (UNDERBAR): Move to sys-globals.boot.
* interp/fname.lisp: Import "macros".
* interp/debug.lisp: Import "parsing".
Replace $PRETTYPRINT with $PrettyPrint.
(/FN): Define.
(depthAlist): Likewise.
* interp/br-search.boot (docSearch1): Fix thinko.
* interp/Makefile.pamphlet (debug.$(FASLEXT)): Depend on
parsing.$(FASLEXT).
* interp/i-output.boot (starstarcond): Remove used function.
(transcomparg): Likewise.
(MATBORCH): Define here.
(*TALLPAR): Likewise.
* interp/vmlisp.lisp (|char|): Remove duplicate definition.
Diffstat (limited to 'src/interp/sys-utility.boot')
| -rw-r--r-- | src/interp/sys-utility.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot index ab20480b..faf4708d 100644 --- a/src/interp/sys-utility.boot +++ b/src/interp/sys-utility.boot @@ -53,7 +53,7 @@ delete(item,sequence) == SYMBOLP item => REMOVE(item,sequence,KEYWORD::TEST,function EQ) atom item and not ARRAYP item => - REMOVE(item,SEQUENCE) + REMOVE(item,sequence) REMOVE(item,sequence,KEYWORD::TEST,function EQUALP) ++ returns true if `x' is contained in `y'. |