branch : pmacs2
This commit is contained in:
moculus 2009-03-28 02:53:04 +00:00
parent 08e1006933
commit abaaef7c83
1 changed files with 0 additions and 7 deletions

View File

@ -14,8 +14,6 @@ class SchemeGrammar(Grammar):
PatternRule(r'eol', r'\n'),
PatternRule(r'abbrev', r"'|`|,\@|,"),
#PatternMatchRule(r'xyz', r'(abc)(def)(g*)(hij)', 'f1', 'f2', 'f3', 'f4'),
# from r5rs
PatternRule(r'scheme_keyword', r'(?:=>|unquote-splicing|unquote|syntax-rules|set!|quote|quasiquote|or|map|loop|letrec-syntax|letrec|let-syntax|let\*|let|lambda|if|for-each|else|dynamic-wind|do|delay|define-syntax|define-macro|define|cond|case|call-with-output-file|call-with-input-file|call-with-current-continuation|begin|and)(?![^\n )])'),
@ -62,11 +60,6 @@ class Scheme(Lisp):
'scheme_char': ('green', 'default', 'bold'),
'scheme_boolean': ('magenta', 'default', 'bold'),
'scheme_number': ('default', 'default', 'bold'),
#'f1': ('red', 'default'),
#'f2': ('yellow', 'default'),
#'f3': ('green', 'default'),
#'f4': ('cyan', 'default'),
}
actions = [SchemeCheckSyntax, GuileStart, GuileLoadFile]
_bindings = {