Branch Coverage

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


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