| 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, "<:[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, "\\\\<:[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, "#[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, "'((\\\\[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, "<:[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, "[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, "(\\\\[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")) |