diff options
| author | dos-reis <gdr@axiomatics.org> | 2010-05-07 01:09:19 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2010-05-07 01:09:19 +0000 |
| commit | 57cc9e7ab4606e72a6a12fd73fc4cc3cf0e10a83 (patch) | |
| tree | d5b9110e0ec3749173ab6b6ec07f42c160f5ccdb /src/boot/tokens.boot | |
| parent | e869c4e050f29dffb51d26f53489422020f49e4f (diff) | |
| download | open-axiom-57cc9e7ab4606e72a6a12fd73fc4cc3cf0e10a83.tar.gz | |
* boot/ast.boot: Miscellaneous cleanup.
* boot/includer.boot: Likewise.
* boot/parser.boot: Likewise.
* boot/pile.boot: Likewise.
* boot/scanner.boot: Likewise.
* boot/tokens.boot: Likewise.
* boot/translator.boot: Likewise.
Diffstat (limited to 'src/boot/tokens.boot')
| -rw-r--r-- | src/boot/tokens.boot | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/src/boot/tokens.boot b/src/boot/tokens.boot index 38310ce0..9d4f6274 100644 --- a/src/boot/tokens.boot +++ b/src/boot/tokens.boot @@ -216,18 +216,18 @@ for i in [ _ ["MAX", -999999] , _ ["MIN", 999999] , _ ["*", 1] , _ - ["times", 1] , _ - ["CONS", NIL] , _ - ["APPEND", NIL] , _ - ["append", NIL] , _ - ["UNION", NIL] , _ - ["UNIONQ", NIL] , _ - ["union", NIL] , _ - ["NCONC", NIL] , _ - ["and", 'T] , _ - ["or", NIL] , _ - ["AND", 'T] , _ - ["OR", NIL] _ + ["times", 1] , _ + ["CONS", nil] , _ + ["APPEND", nil] , _ + ["append", nil] , _ + ["UNION", nil] , _ + ["UNIONQ", nil] , _ + ["union", nil] , _ + ["NCONC", nil] , _ + ["and", true] , _ + ["or", false] , _ + ["AND", true] , _ + ["OR", false] _ ] repeat SETF (GET(first i,'SHOETHETA),CDR i) |