diff options
author | ubq323 <ubq323@ubq323.website> | 2023-07-11 02:06:59 +0100 |
---|---|---|
committer | ubq323 <ubq323@ubq323.website> | 2023-07-11 02:06:59 +0100 |
commit | d9eb793ad606fd47d17a17af24b78b46f2180f84 (patch) | |
tree | 14d943dc1a226a187b20285ea53828f72b251e42 /grammar.peg | |
parent | 1e19e4c6e052909bf76a30b26f63dcf32576e994 (diff) |
allow more characters in symbols
Diffstat (limited to 'grammar.peg')
-rw-r--r-- | grammar.peg | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/grammar.peg b/grammar.peg index 9b8e882..12847e5 100644 --- a/grammar.peg +++ b/grammar.peg @@ -22,10 +22,10 @@ list <- { $$ = astnode_new_list(); } )* ')' _ -number <- < [0-9]+ > _ { $$ = astnode_new_num(atoi($1)); } -symbol <- < [a-z]+ > _ { $$ = astnode_new_symbol(strdup($1)); } - +number <- < [0-9]+ > _ (! ident_char) { $$ = astnode_new_num(atoi($1)); } +symbol <- < ident_char+ > _ { $$ = astnode_new_symbol(strdup($1)); } +ident_char <- [-_a-zA-Z'+*0-9] _ <- [ \t]* %% |