| line |
true |
false |
branch |
|
45
|
0 |
104 |
unless my $name = $self->{'MSBE_name'} = $args->{'_name'}
|
|
46
|
0 |
104 |
unless my $expr = $args->{'_expr'}
|
|
49
|
3 |
101 |
if (ref $expr eq 'SCALAR') { }
|
|
|
0 |
174 |
elsif (not ref $expr and $returns and $returns->isa('MF::STRING')) { }
|
|
133
|
0 |
301 |
if $parens_open
|
|
141
|
267 |
299 |
if @$t < 2
|
|
146
|
5 |
596 |
if ($first->isa("MF::PARENS"))
|
|
151
|
5 |
20 |
if $node->isa("MF::PARENS") and $node->level == $level
|
|
158
|
38 |
558 |
if (ref $first eq "MF::OPERATOR")
|
|
161
|
6 |
32 |
if ($op eq "#" or $op eq ".")
|
|
169
|
0 |
32 |
unless my $next = $self->_build_ast($t, $prio)
|
|
177
|
267 |
291 |
unless my $next = $t->[0]
|
|
180
|
2 |
289 |
if (ref $next ne "MF::OPERATOR")
|
|
181
|
2 |
0 |
if ($next->isa('MF::TIMEZONE')) { }
|
|
192
|
0 |
291 |
unless @$t
|
|
196
|
25 |
266 |
if $next_prio < $prio or $next_prio == $prio and $assoc == 1
|
|
200
|
7 |
259 |
if ($op eq ":")
|
|
205
|
7 |
252 |
if ($op eq "?")
|
|
208
|
0 |
0 |
$next ? :
|
|
|
0 |
7 |
unless $colon and $colon->token eq ":"
|
|
228
|
7 |
0 |
$expr->isa('Math::Formula::Type') ? :
|
|
|
268 |
7 |
!builtin::blessed($expr) ? :
|
|
|
4 |
275 |
ref $expr eq 'CODE' ? :
|
|
236
|
2 |
277 |
$result && $expect && !$result->isa($expect) ? :
|
|
246
|
8 |
14 |
if (builtin::blessed($data))
|
|
247
|
4 |
4 |
if $data->isa("Math::Formula::Type")
|
|
248
|
1 |
3 |
if $data->isa("DateTime")
|
|
249
|
1 |
2 |
if $data->isa("DateTime::Duration")
|
|
250
|
1 |
1 |
if $data->isa("Math::Formula::Context")
|
|
263
|
4 |
0 |
$data =~ /^(['"]).*\1$/ ? :
|
|
|
1 |
4 |
$data =~ /$_match{'MF::DURATION'}/ ? :
|
|
|
2 |
5 |
$data =~ /$_match{'MF::DATE'}/ ? :
|
|
|
2 |
7 |
$data =~ /$_match{'MF::TIME'}/ ? :
|
|
|
1 |
9 |
$data =~ /$_match{'MF::DATETIME'}/ ? :
|
|
|
1 |
10 |
ref $data eq 'Regexp' ? :
|
|
|
1 |
11 |
$data =~ /^(?:true|false)$/ ? :
|
|
|
1 |
12 |
$data =~ /^[+-]?[0-9]+\./ ? :
|
|
|
1 |
13 |
$data =~ /^[+-]?[0-9]+$/ ? :
|
|
|
1 |
14 |
if (ref $data eq 'SCALAR') { }
|