Branch Coverage

blib/lib/CORBA/IDL/Lexer.pm

Criterion	Covered	Total	%
branch	0	248	0.0

line	true	false	branch
25	0	0	if s/^\"//
28	0	0	if s/^([^"\\]+)//
32	0	0	if s/^\\a//
35	0	0	if s/^\\b//
38	0	0	if s/^\\f//
41	0	0	if s/^\\n//
44	0	0	if s/^\\r//
47	0	0	if s/^\\t//
50	0	0	if s/^\\v//
53	0	0	if s/^\\([\?'"])//
57	0	0	oct $1 ? :
	0	0	if s/^\\([0-7]{1,3})//
61	0	0	hex $1 ? :
	0	0	if s/^\\x([0-9A-Fa-f]{1,2})//
65	0	0	if ($token eq 'WIDE_STRING_LITERAL')
66	0	0	hex $1 ? :
	0	0	if s/^\\u([0-9A-Fa-f]{1,4})//
72	0	0	if s/^\\//
86	0	0	if s/^([^'\\])\'//
89	0	0	if s/^\\n\'//
91	0	0	if s/^\\t\'//
93	0	0	if s/^\\v\'//
95	0	0	if s/^\\b\'//
97	0	0	if s/^\\r\'//
99	0	0	if s/^\\f\'//
101	0	0	if s/^\\a\'//
103	0	0	if s/^\\([\?'"])\'//
105	0	0	if s/^\\([0-7]{1,3})\'//
107	0	0	if s/^\\x([0-9A-Fa-f]{1,2})\'//
109	0	0	if ($token eq 'WIDE_STRING_LITERAL')
110	0	0	if s/^\\u([0-9A-Fa-f]{1,4})\'//
115	0	0	if s/^\\([^\s\(\)\[\]\{\}<>,;:="]*)//
118	0	0	if s/^([^\s\(\)\[\]\{\}<>,;:="]*)//
130	0	0	if (exists $parser->YYData->{'keyword'}{$key})
132	0	0	if ($CORBA::IDL::Parser::IDL_VERSION ge $version) { }
133	0	0	if ($ident eq $keywd) { }
142	0	0	if (defined $lang) { }
143	0	0	if ($ident eq $keywd) { }
151	0	0	if ($ident eq $keywd) { }
166	0	0	if ($CORBA::IDL::Parser::IDL_VERSION ge '2.3') { }
168	0	0	unless (exists $parser->YYData->{'keyword'}{$key})
202	0	0	unless $parser->YYData->{'line'} or $parser->YYData->{'line'} = readline $parser->YYData->{'fh'}
207	0	0	if s/^\n//
210	0	0	if s[^\*/][]
212	0	0	if s/^.[^*\n]*//
224	0	0	unless $parser->YYData->{'line'} or $parser->YYData->{'line'} = readline $parser->YYData->{'fh'}
229	0	0	if s/^(\n)//
234	0	0	if s/^\r//
236	0	0	if s[^\*/][]
238	0	0	unless ($flag)
239	0	0	if s/^\*//
244	0	0	if s/^([ \t\f\013]+)//
246	0	0	if s/^(.[\w \t]*)//
257	0	0	unless (defined $parser->YYData->{'curr_node'})
262	0	0	unless (exists $parser->YYData->{'curr_node'}{'doc'})
267	0	0	unless $parser->YYData->{'line'} or $parser->YYData->{'line'} = readline $parser->YYData->{'fh'}
272	0	0	if s/^(\n)//
277	0	0	if s/^\r//
279	0	0	if s[^\*/][]
281	0	0	unless ($flag)
282	0	0	if s/^\*//
287	0	0	if s/^([ \t\f\013]+)//
289	0	0	if s/^(.[\w \t]*)//
302	0	0	unless $parser->YYData->{'line'} or $parser->YYData->{'line'} = readline $parser->YYData->{'fh'}
307	0	0	if s/^(\n)//
311	0	0	if s/^%\}.*//
313	0	0	if s/^(.[^%\n]*)//
324	0	0	if s/^ID[ \t]+([0-9A-Za-z_:]+)[ \t]+\"([^\s">]+)\"//
327	0	0	if s[^prefix[ \t]+\"([0-9A-Za-z_:\./\-]*)\"][]
330	0	0	if s/^version[ \t]+([0-9A-Za-z_:]+)[ \t]+([0-9]+)\.([0-9]+)//
342	0	0	if (defined $parser->YYData->{'curr_node'})
343	0	0	if (exists $parser->YYData->{'curr_node'}{'doc'}) { }
356	0	0	unless $parser->YYData->{'line'} or $parser->YYData->{'line'} = readline $parser->YYData->{'fh'}
360	0	0	unless (exists $parser->YYData->{'srcname'})
361	0	0	if ($parser->YYData->{'line'} =~ /^#\s*(line\s+)?\d+\s+["<]([^\s">]+)[">]\s*\n/) { }
367	0	0	if (defined $parser->YYData->{'srcname'})
375	0	0	if s/^#\s+[\d]+\s+"<[^>]+>"\s*\d*\s*\n//
378	0	0	if s/^#\s+([\d]+)\s+["<]([^\s">]+)[">]\s+([\d]+)\s*\n//
385	0	0	if s/^#\s+([\d]+)\s+["<]([^\s">]+)[">]\s*\n//
391	0	0	if s/^#\s*line\s+([\d]+)\s+["<]([^\s">]+)[">]\s*\n//
399	0	0	if s/^\n//
404	0	0	if s/^#pragma\s+(.*)\n//
410	0	0	if s[^/\*\*<][]
413	0	0	if s[^/\*\*][]
416	0	0	if s[^///(.*)\n][] and _AttachDoc($parser, $1)
421	0	0	if s[^/\*][]
424	0	0	if s[^//.*\n][]
429	0	0	if s/^%\{//
432	0	0	if ($parser->YYData->{'prop'})
433	0	0	if s/^([A-Za-z][0-9A-Za-z_]*)//
436	0	0	if s/^\(([^\)]+)\)//
440	0	0	if ($parser->YYData->{'native'})
441	0	0	if s/^([^\)]+)\)//
446	0	0	if s/^__declspec\s*\(\s*([A-Za-z]*)\s*\)//
448	0	0	if s/^([0-9]+)([Dd])//
451	0	0	if s/^([0-9]+\.)([Dd])//
454	0	0	if s/^(\.[0-9]+)([Dd])//
457	0	0	if s/^([0-9]+\.[0-9]+)([Dd])//
461	0	0	if s/^([0-9]+\.[0-9]+[Ee][+\-]?[0-9]+)//
464	0	0	if s/^([0-9]+[Ee][+\-]?[0-9]+)//
467	0	0	if s/^(\.[0-9]+[Ee][+\-]?[0-9]+)//
470	0	0	if s/^([0-9]+\.[0-9]+)//
473	0	0	if s/^([0-9]+\.)//
476	0	0	if s/^(\.[0-9]+)//
480	0	0	if s/^0([0-7]+)//
483	0	0	if s/^(0[Xx])([A-Fa-f0-9]+)//
486	0	0	if s/^(0)//
489	0	0	if s/^([1-9][0-9]*)//
493	0	0	if s/^\"//
496	0	0	if ($CORBA::IDL::Parser::IDL_VERSION ge '2.3') { }
497	0	0	if s/^L\"//
501	0	0	if s/^L\"// and $parser->Warning("literal 'wstring' is not allowed.\n")
506	0	0	if s/^\'//
509	0	0	if ($CORBA::IDL::Parser::IDL_VERSION ge '2.3') { }
510	0	0	if s/^L\'//
514	0	0	if s/^L\'// and $parser->Warning("literal 'wchar' is not allowed.\n")
519	0	0	if s/^([A-Za-z][0-9A-Za-z_]*)//
521	0	0	if s/^_([A-Za-z][0-9A-Za-z_]*)//
524	0	0	if s/^(<<)//
526	0	0	if s/^(>>)//
528	0	0	if s/^(::)//
530	0	0	if s/^(\.\.\.)//
533	0	0	if s<^([\+&/%\*~\|\-\^\(\)\[\]\{\}<>,;:=])>[]
536	0	0	if s/^([\S]+)//