|
|
|
@ -3,7 +3,7 @@
|
|
|
|
|
|
|
|
|
|
(define-lex-abbrev digits (:+ (char-set "0123456789")))
|
|
|
|
|
|
|
|
|
|
(define-lex-abbrev reserved-terms (:or "print" "goto" "end" "+" ":" ";" "let" "=" "input" "-" "*" "/" "^" "mod" "(" ")" "def" "if" "then" "else" "<" ">" "<>" "and" "or" "not" "gosub" "return" "for" "to" "step" "next" "def" "," "import" "export"))
|
|
|
|
|
(define-lex-abbrev reserved-terms (:or "print" "goto" "end" "+" ":" ";" "let" "=" "input" "-" "*" "/" "^" "mod" "(" ")" "if" "then" "else" "<" ">" "<>" "and" "or" "not" "gosub" "return" "for" "to" "step" "next" "def" "," "import" "export"))
|
|
|
|
|
|
|
|
|
|
(define-lex-abbrev racket-id-kapu
|
|
|
|
|
(:or whitespace (char-set "()[]{}\",'`;#|\\")))
|
|
|
|
|