| line |
true |
false |
branch |
|
33
|
18 |
17 |
shift() eq 'true' ? :
|
|
47
|
185 |
245 |
if ($self->{'strict'})
|
|
73
|
58 |
2 |
$token ? :
|
|
74
|
0 |
60 |
if ($ENV{'TOML_TINY_DEBUG'}) { }
|
|
102
|
3549 |
2 |
$token ? :
|
|
103
|
28 |
3523 |
unless $actual =~ /$expected/u
|
|
136
|
2 |
931 |
if ($key and exists $node->{$key})
|
|
147
|
162 |
305 |
if ($token->{'type'} eq "inline_array")
|
|
149
|
0 |
162 |
if exists $self->{'array_tables'}{$key}
|
|
155
|
74 |
231 |
if ($token->{'type'} eq "array_table")
|
|
156
|
1 |
73 |
if (exists $self->{'arrays'}{$key})
|
|
164
|
231 |
0 |
if ($token->{'type'} eq "table")
|
|
167
|
2 |
229 |
if exists $self->{'arrays'}{$key} or exists $self->{'array_tables'}{$key}
|
|
169
|
9 |
220 |
if (exists $self->{'tables'}{$key})
|
|
176
|
8 |
1 |
if (exists $node->{$key} and ref $node->{$key} eq 'ARRAY') { }
|
|
184
|
1 |
8 |
unless ($in_a_stupid_table_array)
|
|
200
|
714 |
275 |
if (exists $node->{$key}) { }
|
|
202
|
569 |
145 |
if ($ref eq "HASH")
|
|
206
|
142 |
3 |
if ($ref eq "ARRAY")
|
|
233
|
308 |
1175 |
if $type eq "EOL"
|
|
235
|
902 |
273 |
if ($type eq "key")
|
|
241
|
642 |
135 |
if (my $eol = $self->next_token) { }
|
|
249
|
35 |
238 |
if ($type eq "array_table")
|
|
255
|
218 |
20 |
if ($type eq "table")
|
|
282
|
129 |
133 |
if $type eq "EOL"
|
|
284
|
79 |
54 |
if ($type eq "key")
|
|
292
|
39 |
15 |
if ($type eq "array_table")
|
|
298
|
15 |
0 |
if ($type eq "table")
|
|
320
|
452 |
862 |
if $type eq "string"
|
|
321
|
98 |
764 |
if $type eq "float"
|
|
322
|
411 |
353 |
if $type eq "integer"
|
|
323
|
37 |
316 |
if $type eq "bool"
|
|
324
|
54 |
262 |
if $type eq "datetime"
|
|
325
|
96 |
166 |
if $type eq "inline_table"
|
|
326
|
162 |
4 |
if $type eq "inline_array"
|
|
365
|
218 |
715 |
if ($token->{'type'} eq "comma")
|
|
370
|
254 |
461 |
if $token->{'type'} eq "EOL"
|
|
371
|
154 |
307 |
if $token->{'type'} eq "inline_array_close"
|
|
392
|
19 |
162 |
if ($type eq "comma")
|
|
394
|
3 |
16 |
$self->{'strict'} ? :
|
|
400
|
74 |
88 |
if ($type eq "key")
|
|
412
|
0 |
74 |
if (exists $node->{$key}) { }
|
|
422
|
86 |
2 |
if $type eq "inline_table_close"
|
|
436
|
1 |
97 |
if ($self->{'inflate_float'})
|
|
440
|
13 |
84 |
if $value =~ /^[-+]?nan$/iu
|
|
441
|
7 |
77 |
if $value =~ /^\+?inf$/iu
|
|
442
|
4 |
73 |
if $value =~ /^-inf$/iu
|
|
445
|
38 |
35 |
if (0 + $value eq $value)
|
|
460
|
25 |
10 |
if ($value =~ /[eE]/u)
|
|
461
|
25 |
0 |
if ("Math::BigFloat"->new($value)->beq(0 + $value))
|
|
475
|
1 |
410 |
if ($self->{'inflate_integer'})
|
|
480
|
15 |
395 |
if ($value =~ /^0x/u)
|
|
484
|
15 |
0 |
$big->beq($hex) ? :
|
|
488
|
11 |
384 |
if ($value =~ /^0o/u)
|
|
493
|
11 |
0 |
$big->beq($oct) ? :
|
|
497
|
10 |
374 |
if ($value =~ /^0b/u)
|
|
501
|
10 |
0 |
$big->beq($bin) ? :
|
|
505
|
368 |
6 |
if (0 + $value eq $value)
|