add char syntax to elisp

--HG--
branch : pmacs2
This commit is contained in:
Erik Osheim 2012-09-13 22:00:11 -06:00
parent bd90421ddc
commit 4ae87e7e2c
1 changed files with 1 additions and 0 deletions

View File

@ -26,6 +26,7 @@ class ELispGrammar(Grammar):
PatternRule('elisp_symbol', "'" + symb), PatternRule('elisp_symbol', "'" + symb),
PatternRule('delimiter', r"'"), PatternRule('delimiter', r"'"),
PatternRule('elisp_type', ":" + symb), PatternRule('elisp_type', ":" + symb),
PatternRule('char', r'\?(?:[^\\]|\\.)'),
PatternRule('attribute', "&" + symb), PatternRule('attribute', "&" + symb),
PatternRule("integer", r"(?<![\.0-9a-zA-Z_])(?:0|-?[1-9][0-9]*|0[0-7]+|0[xX][0-9a-fA-F]+)[lL]?(?![\.0-9a-zA-Z_])"), PatternRule("integer", r"(?<![\.0-9a-zA-Z_])(?:0|-?[1-9][0-9]*|0[0-7]+|0[xX][0-9a-fA-F]+)[lL]?(?![\.0-9a-zA-Z_])"),
PatternRule("float", r"(?<![\.0-9a-zA-Z_])(?:[0-9]+\.[0-9]*|\.[0-9]+|(?:[0-9]|[0-9]+\.[0-9]*|\.[0-9]+)[eE][\+-]?[0-9]+)(?![\.0-9a-zA-Z_])"), PatternRule("float", r"(?<![\.0-9a-zA-Z_])(?:[0-9]+\.[0-9]*|\.[0-9]+|(?:[0-9]|[0-9]+\.[0-9]*|\.[0-9]+)[eE][\+-]?[0-9]+)(?![\.0-9a-zA-Z_])"),