diff options
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 8895fe53..5c8382a3 100644 --- a/src/boot/tokens.boot +++ b/src/boot/tokens.boot @@ -38,7 +38,7 @@ import initial_-env )package "BOOTTRAN" ++ Table of Boot keywords and their token name. -shoeKeyWords := [ _ +shoeKeyWords == [ _ ['"and","AND"] , _ ['"by", "BY" ], _ ['"case","CASE"] , _ @@ -108,27 +108,27 @@ shoeKeyTableCons()== shoeKeyTable:=shoeKeyTableCons() -shoeSPACE := QENUM('" ", 0) +shoeSPACE == QENUM('" ", 0) -shoeESCAPE := QENUM('"__ ", 0) +shoeESCAPE == QENUM('"__ ", 0) shoeLispESCAPE := QENUM('"! ", 0) -shoeSTRING_CHAR := QENUM('"_" ", 0) +shoeSTRING_CHAR == QENUM('"_" ", 0) -shoePLUSCOMMENT := QENUM('"+ ", 0) +shoePLUSCOMMENT == QENUM('"+ ", 0) -shoeMINUSCOMMENT:= QENUM('"- ", 0) +shoeMINUSCOMMENT == QENUM('"- ", 0) -shoeDOT := QENUM('". ", 0) +shoeDOT == QENUM('". ", 0) -shoeEXPONENT1 := QENUM('"E ", 0) +shoeEXPONENT1 == QENUM('"E ", 0) -shoeEXPONENT2 := QENUM('"e ", 0) +shoeEXPONENT2 == QENUM('"e ", 0) -shoeCLOSEPAREN := QENUM('") ", 0) +shoeCLOSEPAREN == QENUM('") ", 0) ---shoeCLOSEANGLE := QENUM('"> ", 0) -shoeTAB := 9 +--shoeCLOSEANGLE == QENUM('"> ", 0) +shoeTAB == 9 shoeInsert(s,d) == l := #s |