diff options
Diffstat (limited to 'src/boot/ast.boot')
-rw-r--r-- | src/boot/ast.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/boot/ast.boot b/src/boot/ast.boot index f1ad60cd..8d3f8c5c 100644 --- a/src/boot/ast.boot +++ b/src/boot/ast.boot @@ -748,11 +748,11 @@ bfChar? x == char? x or cons? x and first x in '(char CODE_-CHAR SCHAR) bfSmintable x== - integer? x or cons? x and first x in '(SIZE LENGTH) + integer? x or cons? x and first x in '(SIZE LENGTH CHAR_-CODE) bfString? x == string? x - or cons? x and first x in '(charString symbolName toString subString) + or cons? x and first x in '(STRING SYMBOL_-NAME subString) bfQ(l,r)== bfChar? l or bfChar? r => ["CHAR=",l,r] |