diff options
author | dos-reis <gdr@axiomatics.org> | 2007-09-13 11:06:16 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2007-09-13 11:06:16 +0000 |
commit | 7491a064401ff3493d32513d9028afecf29f2e5b (patch) | |
tree | 8de315b10585077cec99754ff9fb9eaa9dd472fe /src/interp/vmlisp.lisp.pamphlet | |
parent | 3b5bfc6d56f8cbd020d963622ce9ab6160ee049f (diff) | |
download | open-axiom-7491a064401ff3493d32513d9028afecf29f2e5b.tar.gz |
* Makefile.pamphlet (scan.$(FASLEXT)): New rule.
(pile.$(FASLEXT)): Likewise.
(INOBJS): Don't include parini.$(FASLEXT).
* pile.boot: New. Import scan.
* pile.boot.pamphlet: Move content to pile.boot. Remove.
* vmlisp.lisp.pamphlet (|startsId?|): Move to sys-macros.lisp.
* parini.boot.pamphlet: Move content to scan.boot. Remove.
* scan.boot: New. Import bits, dq, incl. Add workaround for GCL
bug.
($SPACE): Rename from SPACE to avoid conflict with CL name.
* scan.boot.pamphlet: Move content to scan.boot. Remove.
Diffstat (limited to 'src/interp/vmlisp.lisp.pamphlet')
-rw-r--r-- | src/interp/vmlisp.lisp.pamphlet | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/interp/vmlisp.lisp.pamphlet b/src/interp/vmlisp.lisp.pamphlet index 4bc1b1ac..0497f8c9 100644 --- a/src/interp/vmlisp.lisp.pamphlet +++ b/src/interp/vmlisp.lisp.pamphlet @@ -721,9 +721,6 @@ and works properly. (defmacro smintp (n) `(fixp ,n)) -(defmacro |startsId?| (x) - `(or (alpha-char-p ,x) (member ,x '(#\? #\% #\!) :test #'char=))) - (defmacro stringlength (x) `(length (the string ,x))) |