line |
true |
false |
branch |
157
|
0 |
0 |
if ($self->testDetect2Chars($text, '>', '>', 0, 0, 0, undef, 0, '#pop', 'Camlp4 Quotation')) |
165
|
0 |
0 |
if ($self->testDetect2Chars($text, '<', '<', 0, 0, 0, undef, 0, 'Camlp4 Quotation Constant', 'Camlp4 Quotation')) |
172
|
0 |
0 |
if ($self->testRegExpr($text, q[<:[A-Za-z\\300-\\326\\330-\\366\\370-\\377_][A-Za-z\\300-\\326\\330-\\366\\370-\\3770-9_']*<], 0, 0, 0, undef, 0, 'Camlp4 Quotation Constant', 'Camlp4 Quotation')) |
179
|
0 |
0 |
if ($self->testRegExpr($text, '\\\\(\\\\|>>|<<)', 0, 0, 0, undef, 0, '#stay', 'Escaped characters')) |
186
|
0 |
0 |
if ($self->testRegExpr($text, q[\\\\<:[A-Za-z\\300-\\326\\330-\\366\\370-\\377_][A-Za-z\\300-\\326\\330-\\366\\370-\\3770-9_']*<], 0, 0, 0, undef, 0, '#stay', 'Escaped characters')) |
200
|
0 |
0 |
if ($self->testDetect2Chars($text, '*', ')', 0, 0, 0, undef, 0, '#pop', 'Comment')) |
209
|
0 |
0 |
if ($self->testDetect2Chars($text, '(', '*', 0, 0, 0, undef, 0, 'Multiline Comment', 'Comment')) |
223
|
0 |
0 |
if ($self->testDetect2Chars($text, '(', '*', 0, 0, 0, undef, 0, 'Multiline Comment', 'Comment')) |
231
|
0 |
0 |
if ($self->testRegExpr($text, q[#[A-Za-z\\300-\\326\\330-\\366\\370-\\377_][A-Za-z\\300-\\326\\330-\\366\\370-\\3770-9_']*.*$], 0, 0, 0, undef, 1, '#stay', 'Directive')) |
238
|
0 |
0 |
if ($self->testDetectChar($text, '"', 0, 0, 0, undef, 0, 'String Constant', 'String')) |
245
|
0 |
0 |
if ($self->testRegExpr($text, q('((\\\\[ntbr'"\\\\]|\\\\[0-9]{3}|\\\\x[0-9A-Fa-f]{2})|[^'])'), 0, 0, 0, undef, 0, '#stay', 'Character')) |
253
|
0 |
0 |
if ($self->testDetect2Chars($text, '<', '<', 0, 0, 0, undef, 0, 'Camlp4 Quotation Constant', 'Camlp4 Quotation')) |
260
|
0 |
0 |
if ($self->testRegExpr($text, q[<:[A-Za-z\\300-\\326\\330-\\366\\370-\\377_][A-Za-z\\300-\\326\\330-\\366\\370-\\3770-9_']*<], 0, 0, 0, undef, 0, 'Camlp4 Quotation Constant', 'Camlp4 Quotation')) |
267
|
0 |
0 |
if ($self->testKeyword($text, 'keywords', 0, undef, 0, '#stay', 'Keyword')) |
274
|
0 |
0 |
if ($self->testKeyword($text, 'revised syntax keywords', 0, undef, 0, '#stay', 'Revised Syntax Keyword')) |
281
|
0 |
0 |
if ($self->testKeyword($text, 'core types', 0, undef, 0, '#stay', 'Core Data Type')) |
288
|
0 |
0 |
if ($self->testRegExpr($text, q[[A-Za-z\\300-\\326\\330-\\366\\370-\\377_][A-Za-z\\300-\\326\\330-\\366\\370-\\3770-9_']*], 0, 0, 0, undef, 0, '#stay', 'Identifier')) |
295
|
0 |
0 |
if ($self->testRegExpr($text, '-?0[xX][0-9A-Fa-f_]+', 0, 0, 0, undef, 0, '#stay', 'Hexadecimal')) |
302
|
0 |
0 |
if ($self->testRegExpr($text, '-?0[oO][0-7_]+', 0, 0, 0, undef, 0, '#stay', 'Octal')) |
309
|
0 |
0 |
if ($self->testRegExpr($text, '-?0[bB][01_]+', 0, 0, 0, undef, 0, '#stay', 'Binary')) |
316
|
0 |
0 |
if ($self->testRegExpr($text, '-?[0-9][0-9_]*(\\.[0-9][0-9_]*([eE][-+]?[0-9][0-9_]*)?|[eE][-+]?[0-9][0-9_]*)', 0, 0, 0, undef, 0, '#stay', 'Float')) |
323
|
0 |
0 |
if ($self->testRegExpr($text, '-?[0-9][0-9_]*', 0, 0, 0, undef, 0, '#stay', 'Decimal')) |
335
|
0 |
0 |
if ($self->testDetectChar($text, '"', 0, 0, 0, undef, 0, '#pop', 'String')) |
342
|
0 |
0 |
if ($self->testRegExpr($text, q((\\\\[ntbr'"\\\\]|\\\\[0-9]{3}|\\\\x[0-9A-Fa-f]{2})), 0, 0, 0, undef, 0, '#stay', 'Escaped characters')) |
349
|
0 |
0 |
if ($self->testRegExpr($text, '\\\\$', 0, 0, 0, undef, 0, '#stay', 'Escaped characters')) |