| line |
true |
false |
branch |
|
211
|
0 |
0 |
if ($self->testKeyword($text, "attention", 0, undef, 0, "#stay", "Alert")) |
|
219
|
0 |
0 |
if ($self->testDetectChar($text, "}", 0, 0, 0, undef, 0, "#pop", "Comment")) |
|
231
|
0 |
0 |
if ($self->testKeyword($text, "attention", 0, undef, 0, "#stay", "Alert")) |
|
240
|
0 |
0 |
if ($self->testDetect2Chars($text, "*", ")", 0, 0, 0, undef, 0, "#pop", "Comment")) |
|
252
|
0 |
0 |
if ($self->testKeyword($text, "attention", 0, undef, 0, "#stay", "Alert")) |
|
266
|
0 |
0 |
if ($self->testRegExpr($text, "\\b(begin|case|record)(?=(\\{[^}]*(\\}|\$)|\\(\\*.*(\\*\\)|\$))*([\\s]|\$|//))", 1, 0, 0, undef, 0, "#stay", "Keyword")) |
|
275
|
0 |
0 |
if ($self->testRegExpr($text, "\\b((object|class)(?=(\\(.*\\))?(\\{[^}]*(\\}|\$)|\\(\\*.*(\\*\\)|\$))*;?([\\s]|\$|//))|try(?=(\\{[^}]*(\\}|\$)|\\(\\*.*(\\*\\)|\$))*([\\s]|\$|//)))", 1, 0, 0, undef, 0, "#stay", "ISO/Delphi Extended")) |
|
284
|
0 |
0 |
if ($self->testRegExpr($text, "\\bend(?=((\\{[^}]*(\\}|\$)|\\(\\*.*(\\*\\)|\$))*)([.;\\s]|\$)|//|\$)", 1, 0, 0, undef, 0, "#stay", "Keyword")) |
|
291
|
0 |
0 |
if ($self->testKeyword($text, "keywords", 0, undef, 0, "#stay", "Keyword")) |
|
298
|
0 |
0 |
if ($self->testKeyword($text, "ISO/Delphi Extended", 0, undef, 0, "#stay", "ISO/Delphi Extended")) |
|
305
|
0 |
0 |
if ($self->testKeyword($text, "types", 0, undef, 0, "#stay", "Type")) |
|
311
|
0 |
0 |
if ($self->testFloat($text, 0, undef, 0, "#stay", "Number")) |
|
317
|
0 |
0 |
if ($self->testInt($text, 0, undef, 0, "#stay", "Number")) |
|
324
|
0 |
0 |
if ($self->testDetectChar($text, "'", 0, 0, 0, undef, 0, "String", "String")) |
|
331
|
0 |
0 |
if ($self->testStringDetect($text, "(*\$", 0, 0, 0, undef, 0, "Prep1", "Directive")) |
|
339
|
0 |
0 |
if ($self->testDetect2Chars($text, "{", "\$", 0, 0, 0, undef, 0, "Prep2", "Directive")) |
|
347
|
0 |
0 |
if ($self->testDetectChar($text, "{", 0, 0, 0, undef, 0, "Comment1", "Comment")) |
|
356
|
0 |
0 |
if ($self->testDetect2Chars($text, "(", "*", 0, 0, 0, undef, 0, "Comment2", "Comment")) |
|
364
|
0 |
0 |
if ($self->testDetect2Chars($text, "/", "/", 0, 0, 0, undef, 0, "Comment3", "Comment")) |
|
377
|
0 |
0 |
if ($self->testDetect2Chars($text, "*", ")", 0, 0, 0, undef, 0, "#pop", "Directive")) |
|
389
|
0 |
0 |
if ($self->testDetectChar($text, "}", 0, 0, 0, undef, 0, "#pop", "Directive")) |
|
401
|
0 |
0 |
if ($self->testDetectChar($text, "'", 0, 0, 0, undef, 0, "#pop", "String")) |