| line |
true |
false |
branch |
|
178
|
0 |
0 |
if ($self->testDetect2Chars($text, "*", ")", 0, 0, 0, undef, 0, "#pop", "CommentMaior")) |
|
186
|
0 |
0 |
if ($self->testDetect2Chars($text, "(", "*", 0, 0, 0, undef, 0, "CommentN", "CommentMinor")) |
|
200
|
0 |
0 |
if ($self->testDetect2Chars($text, "*", ")", 0, 0, 0, undef, 0, "#pop", "CommentMinor")) |
|
208
|
0 |
0 |
if ($self->testDetect2Chars($text, "(", "*", 0, 0, 0, undef, 0, "CommentN", "CommentMinor")) |
|
221
|
0 |
0 |
if ($self->testDetect2Chars($text, "*", ")", 0, 0, 0, undef, 0, "#pop", "CommentMinor")) |
|
229
|
0 |
0 |
if ($self->testDetect2Chars($text, "(", "*", 0, 0, 0, undef, 0, "CommentN2", "CommentMinor")) |
|
242
|
0 |
0 |
if ($self->testDetect2Chars($text, "*", ")", 0, 0, 0, undef, 0, "#pop", "CommentMinor")) |
|
255
|
0 |
0 |
if ($self->testStringDetect($text, "(**", 0, 0, 0, undef, 0, "Comment1", "CommentMaior")) |
|
264
|
0 |
0 |
if ($self->testDetect2Chars($text, "(", "*", 0, 0, 0, undef, 0, "Comment2", "CommentMinor")) |
|
271
|
0 |
0 |
if ($self->testDetectChar($text, "\"", 0, 0, 0, undef, 0, "String1", "String")) |
|
278
|
0 |
0 |
if ($self->testDetectChar($text, "'", 0, 0, 0, undef, 0, "String2", "String")) |
|
286
|
0 |
0 |
if ($self->testRegExpr($text, "PROCEDURE\\s", 0, 0, 0, undef, 0, "#stay", "Keyword")) |
|
294
|
0 |
0 |
if ($self->testRegExpr($text, "ABSTRACT;|EMPTY;|END\\s*[A-Za-z][A-Za-z0-9_]*\\;", 0, 0, 0, undef, 0, "#stay", "Normal Text")) |
|
302
|
0 |
0 |
if ($self->testRegExpr($text, "RECORD", 0, 0, 0, undef, 0, "#stay", "Type")) |
|
310
|
0 |
0 |
if ($self->testRegExpr($text, "END", 0, 0, 0, undef, 0, "#stay", "Keyword")) |
|
317
|
0 |
0 |
if ($self->testStringDetect($text, "NEW", 0, 0, 0, undef, 0, "#stay", "MemAlloc")) |
|
324
|
0 |
0 |
if ($self->testKeyword($text, "keywords", 0, undef, 0, "#stay", "Keyword")) |
|
331
|
0 |
0 |
if ($self->testKeyword($text, "exits", 0, undef, 0, "#stay", "Exit")) |
|
338
|
0 |
0 |
if ($self->testKeyword($text, "types", 0, undef, 0, "#stay", "Type")) |
|
345
|
0 |
0 |
if ($self->testKeyword($text, "attributes", 0, undef, 0, "#stay", "Attribute")) |
|
352
|
0 |
0 |
if ($self->testKeyword($text, "builtins", 0, undef, 0, "#stay", "Builtin")) |
|
359
|
0 |
0 |
if ($self->testKeyword($text, "specials", 0, undef, 0, "#stay", "SpecialValues")) |
|
366
|
0 |
0 |
if ($self->testRegExpr($text, "\\s[\\+|\\-]{0,1}[0-9]([0-9]*|[0-9A-F]*(H|L))", 0, 0, 0, undef, 0, "#stay", "Integer")) |
|
372
|
0 |
0 |
if ($self->testFloat($text, 0, undef, 0, "#stay", "Float")) |
|
379
|
0 |
0 |
if ($self->testRegExpr($text, "\\s[0-9][0-9A-F]*X", 0, 0, 0, undef, 0, "#stay", "Char")) |
|
386
|
0 |
0 |
if ($self->testRegExpr($text, "[A-Za-z][A-Za-z0-9_]*\\*", 0, 0, 0, undef, 0, "#stay", "ExportFull")) |
|
393
|
0 |
0 |
if ($self->testRegExpr($text, "[A-Za-z][A-Za-z0-9_]*\\-", 0, 0, 0, undef, 0, "#stay", "ExportReadOnly")) |
|
400
|
0 |
0 |
if ($self->testRegExpr($text, "\\s(=|#|<|<=|>|>=|IN\\s|IS)", 0, 0, 0, undef, 0, "#stay", "Relation")) |
|
407
|
0 |
0 |
if ($self->testRegExpr($text, "\\s(\\+|\\-|OR|\\*|/|DIV|MOD|\\&)", 0, 0, 0, undef, 0, "#stay", "Operator")) |
|
419
|
0 |
0 |
if ($self->testDetectChar($text, "\"", 0, 0, 0, undef, 0, "#pop", "String")) |
|
431
|
0 |
0 |
if ($self->testDetectChar($text, "'", 0, 0, 0, undef, 0, "#pop", "String")) |