From: Jan P. <jp...@us...> - 2007-05-27 14:43:56
|
Update of /cvsroot/e-p-i-c/org.epic.perleditor/src/org/epic/core/parser In directory sc8-pr-cvs17:/tmp/cvs-serv22389/src/org/epic/core/parser Modified Files: perl.g Log Message: Fixed a regression bug caused by fix of [ 1722253 ] Number literals - wrong syntax coloring. Index: perl.g =================================================================== RCS file: /cvsroot/e-p-i-c/org.epic.perleditor/src/org/epic/core/parser/perl.g,v retrieving revision 1.20 retrieving revision 1.21 diff -u -d -r1.20 -r1.21 --- perl.g 21 May 2007 15:00:18 -0000 1.20 +++ perl.g 27 May 2007 14:43:44 -0000 1.21 @@ -399,7 +399,7 @@ protected NUMBER : ("0x" ('0'..'9' | 'A'..'F' | 'a'..'f' | '_')+) | ("0b" ('0' | '1' | '_')+) - | ('0'..'9' | '_')+ + | ('0'..'9') ('0'..'9' | '_')* { slashRegexp = qmarkRegexp = glob = afterArrow = false; $setType(PerlTokenTypes.NUMBER); |