| line |
true |
false |
branch |
|
387
|
2 |
290 |
if ($self->testDetect2Chars($text, '-', '}', 0, 0, 0, undef, 0, '#pop', 'Comment')) |
|
404
|
0 |
0 |
if ($self->testDetectChar($text, ';', 0, 0, 0, undef, 0, '#pop', 'Function Definition')) |
|
416
|
12 |
38 |
if ($self->testDetectChar($text, '`', 0, 0, 0, undef, 0, '#pop', 'Infix Operator')) |
|
429
|
2 |
4594 |
if ($self->testDetect2Chars($text, '{', '-', 0, 0, 0, undef, 0, 'comment_multi_line', 'Comment')) |
|
437
|
2 |
4592 |
if ($self->testDetect2Chars($text, '-', '-', 0, 0, 0, undef, 0, 'comment_single_line', 'Comment')) |
|
444
|
64 |
4528 |
if ($self->testKeyword($text, 'keywords', 0, undef, 0, '#stay', 'Keyword')) |
|
451
|
52 |
4476 |
if ($self->testKeyword($text, 'classes', 0, undef, 0, '#stay', 'Class')) |
|
458
|
52 |
4424 |
if ($self->testKeyword($text, 'type constructors', 0, undef, 0, '#stay', 'Type Constructor')) |
|
465
|
486 |
3938 |
if ($self->testKeyword($text, 'functions', 0, undef, 0, '#stay', 'Function')) |
|
472
|
16 |
3922 |
if ($self->testKeyword($text, 'data constructors', 0, undef, 0, '#stay', 'Data Constructor')) |
|
479
|
24 |
3898 |
if ($self->testDetectChar($text, '"', 0, 0, 0, undef, 0, 'string', 'String')) |
|
486
|
12 |
3886 |
if ($self->testDetectChar($text, '`', 0, 0, 0, undef, 0, 'infix', 'Infix Operator')) |
|
493
|
12 |
3874 |
if ($self->testRegExpr($text, q[\\w[']+], 0, 0, 0, undef, 0, '#stay', 'Normal Text')) |
|
500
|
12 |
3862 |
if ($self->testDetectChar($text, q['], 0, 0, 0, undef, 0, 'single_char', 'Char')) |
|
507
|
8 |
3854 |
if ($self->testRegExpr($text, q[[a-z_]+\\w*'*\\s*::], 0, 0, 0, undef, 0, '#stay', 'Function Definition')) |
|
513
|
42 |
3812 |
if ($self->testFloat($text, 0, undef, 0, '#stay', 'Float')) |
|
519
|
0 |
3812 |
if ($self->testInt($text, 0, undef, 0, '#stay', 'Decimal')) |
|
531
|
4 |
46 |
if ($self->testRegExpr($text, '\\\\.', 0, 0, 0, undef, 0, '#stay', 'Char')) |
|
538
|
12 |
34 |
if ($self->testDetectChar($text, q['], 0, 0, 0, undef, 0, '#pop', 'Char')) |
|
550
|
0 |
184 |
if ($self->testRegExpr($text, '\\\\.', 0, 0, 0, undef, 0, '#stay', 'String')) |
|
557
|
24 |
160 |
if ($self->testDetectChar($text, '"', 0, 0, 0, undef, 0, '#pop', 'String')) |