diff options
Diffstat (limited to 'src/boot')
-rw-r--r-- | src/boot/strap/tokens.clisp | 1 | ||||
-rw-r--r-- | src/boot/tokens.boot | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/src/boot/strap/tokens.clisp b/src/boot/strap/tokens.clisp index 190955b9..c55ed69a 100644 --- a/src/boot/strap/tokens.clisp +++ b/src/boot/strap/tokens.clisp @@ -231,6 +231,7 @@ (LIST '|symbol?| 'SYMBOLP) (LIST '|take| 'TAKE) (LIST '|third| 'CADDR) (LIST '|true| 'T) (LIST '|upperCase?| 'UPPER-CASE-P) + (LIST '|vector?| 'SIMPLE-VECTOR-P) (LIST '|writeByte| 'WRITE-BYTE) (LIST '|writeLine| 'WRITE-LINE) (LIST 'PLUS '+) (LIST 'MINUS '-) (LIST 'TIMES '*) (LIST 'POWER 'EXPT) diff --git a/src/boot/tokens.boot b/src/boot/tokens.boot index 8001250a..c2b2f120 100644 --- a/src/boot/tokens.boot +++ b/src/boot/tokens.boot @@ -285,6 +285,7 @@ for i in [ _ ["third", "CADDR"] , _ ["true", "T"] , _ ["upperCase?", "UPPER-CASE-P"], _ + ["vector?", "SIMPLE-VECTOR-P"], _ ["writeByte", "WRITE-BYTE"], _ ["writeLine", "WRITE-LINE"], _ ["PLUS", "+"] , _ |