Branch Coverage

blib/lib/Syntax/Highlight/Engine/Kate/Euphoria.pm
Criterion Covered Total %
branch 0 46 0.0


line true false branch
347 0 0 if ($self->includePlugin("Alerts", $text))
360 0 0 if ($self->testRegExpr($text, "\\bend\\s+for\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
368 0 0 if ($self->testRegExpr($text, "\\bfor\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
376 0 0 if ($self->testRegExpr($text, "\\bend\\s+if\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
384 0 0 if ($self->testRegExpr($text, "\\bif\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
392 0 0 if ($self->testRegExpr($text, "\\bend\\s+function\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
400 0 0 if ($self->testRegExpr($text, "\\bfunction\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
408 0 0 if ($self->testRegExpr($text, "\\bend\\s+procedure\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
416 0 0 if ($self->testRegExpr($text, "\\bprocedure\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
424 0 0 if ($self->testRegExpr($text, "\\bend\\s+while\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
432 0 0 if ($self->testRegExpr($text, "\\bwhile\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
440 0 0 if ($self->testRegExpr($text, "\\bend\\s+type\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
448 0 0 if ($self->testRegExpr($text, "\\btype\\b", 0, 0, 0, undef, 0, "#stay", "Keyword"))
455 0 0 if ($self->testKeyword($text, "keywords", 0, undef, 0, "#stay", "Keyword"))
462 0 0 if ($self->testKeyword($text, "GtkKeywords", 0, undef, 0, "#stay", "GtkKeyword"))
469 0 0 if ($self->testKeyword($text, "types", 0, undef, 0, "#stay", "Type"))
475 0 0 if ($self->testFloat($text, 0, undef, 0, "#stay", "Number"))
481 0 0 if ($self->testInt($text, 0, undef, 0, "#stay", "Number"))
488 0 0 if ($self->testDetectChar($text, "\"", 0, 0, 0, undef, 0, "String", "String"))
497 0 0 if ($self->testRegExpr($text, "--\\s*BEGIN.*", 0, 0, 0, undef, 1, "#stay", "Region Marker"))
506 0 0 if ($self->testRegExpr($text, "--\\s*END.*", 0, 0, 0, undef, 1, "#stay", "Region Marker"))
514 0 0 if ($self->testDetect2Chars($text, "-", "-", 0, 0, 0, undef, 0, "Comment", "Comment"))
526 0 0 if ($self->testDetectChar($text, "\"", 0, 0, 0, undef, 0, "#pop", "String"))