diff options
author | dos-reis <gdr@axiomatics.org> | 2012-05-19 21:52:28 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2012-05-19 21:52:28 +0000 |
commit | 2595149525297f87d09aba5deb2b93448b3f7411 (patch) | |
tree | 583507762bcc9ae9635465ab686644482f9e3354 /src/boot/strap/tokens.clisp | |
parent | 5d8266cb4f98511dda707ebd08123c476bc361f3 (diff) | |
download | open-axiom-2595149525297f87d09aba5deb2b93448b3f7411.tar.gz |
* boot/tokens.boot: symbolBinding is now builtin.
* boot/ast.boot (%Ast): Add %Dynamic variant.
(bfColonColon): Use symbolBinding instead of FIND-SYMBOLS.
(compFluid): Return a %Dynamic form. Adjust callers.
(shoeCompTran): Tidy.
* boot/translator.boot (BOOTLOOP): Tidy.
(BOOTPO): Likewise.
Diffstat (limited to 'src/boot/strap/tokens.clisp')
-rw-r--r-- | src/boot/strap/tokens.clisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/strap/tokens.clisp b/src/boot/strap/tokens.clisp index 8dd98d44..6f2c0f71 100644 --- a/src/boot/strap/tokens.clisp +++ b/src/boot/strap/tokens.clisp @@ -226,7 +226,7 @@ (LIST '|stringDowncase| 'STRING-DOWNCASE) (LIST '|string?| 'STRINGP) (LIST '|stringEq?| 'STRING=) (LIST '|stringUpcase| 'STRING-UPCASE) - (LIST '|subSequence| 'SUBSEQ) + (LIST '|subSequence| 'SUBSEQ) (LIST '|symbolBinding| 'FIND-SYMBOL) (LIST '|symbolScope| 'SYMBOL-PACKAGE) (LIST '|symbolEq?| 'EQ) (LIST '|symbolFunction| 'SYMBOL-FUNCTION) (LIST '|symbolName| 'SYMBOL-NAME) |