d6
/
pmacs3
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

--HG-- 

branch : pmacs2
This commit is contained in:
moculus 2009-03-26 21:32:52 +00:00
parent a6adf2006e
commit 910d4046ac
1 changed files with 12 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
mode/perl.py
View File

@ -33,12 +33,17 @@ def _make_string_rules(forbidden):
]
return rules
class NoParen(Grammar): rules = [PatternRule(r'data', 'r[^\)]+')]
class NoBrace(Grammar): rules = [PatternRule(r'data', 'r[^\}]+')]
class NoBracket(Grammar): rules = [PatternRule(r'data', 'r[^\]]+')]
class NoAngle(Grammar): rules = [PatternRule(r'data', 'r[^>]+')]
class NoHash(Grammar): rules = [PatternRule(r'data', 'r[^#]+')]
class DataGrammar(Grammar): rules = [PatternRule(r'data', '.+')]
class QuotedWords(Grammar): rules = [
PatternRule(r'data', r'[a-zA-Z0-9_]+'),
PatternRule(r'eol', r'\n'),
PatternRule(r'spaces', r' +'),
]
class NoParen(Grammar): rules = [PatternRule(r'data', r'[^)]+')]
class NoBrace(Grammar): rules = [PatternRule(r'data', r'[^\}]+')]
class NoBracket(Grammar): rules = [PatternRule(r'data', r'[^\]]+')]
class NoAngle(Grammar): rules = [PatternRule(r'data', r'[^>]+')]
class NoHash(Grammar): rules = [PatternRule(r'data', r'[^#]+')]
class DataGrammar(Grammar): rules = [PatternRule(r'data', r'.+')]
class StrictStringGrammar(Grammar):
rules = [
@ -157,7 +162,7 @@ class PerlGrammar(Grammar):
RegionRule(r'quoted', r'q[rqx](?P<delim>#)', StringGrammar, r'#'),
# quote operator: q() and qw() do not interpolate
RegionRule(r'quoted', r'qw? *\(', NoParen, r'\)'),
RegionRule(r'quoted', r'qw? *\(', QuotedWords, r'\)'),
RegionRule(r'quoted', r'qw? *{', NoBrace, r'}'),
RegionRule(r'quoted', r'qw? *<', NoAngle, r'>'),
RegionRule(r'quoted', r'qw? *\[', NoBracket, r'\]'),