| line |
true |
false |
branch |
|
70
|
0 |
0 |
defined $mmf->{'base'} ? :
|
|
74
|
0 |
0 |
if $_[0]->opened
|
|
90
|
0 |
0 |
if $mmf->opened
|
|
94
|
0 |
0 |
if (fcread($flags) and not fctrunc($flags))
|
|
95
|
0 |
0 |
unless $hdr = $mmf->readHeader
|
|
97
|
0 |
0 |
unless $mmf->loadHeaderData($hdr)
|
|
103
|
0 |
0 |
if ($hdr and !defined($hdr->{'version'}) || 'version'->parse($hdr->{'version'}) < $min_version)
|
|
113
|
0 |
0 |
unless $mmf->{'afh'} = fcopen("$base.ma", $flags, $mmf->{'perms'})
|
|
115
|
0 |
0 |
unless $mmf->{'bfh'} = fcopen("$base.mb", $flags, $mmf->{'perms'})
|
|
130
|
0 |
0 |
if ($mmf->opened and fcwrite($mmf->{'flags'}))
|
|
131
|
0 |
0 |
unless $mmf->flush
|
|
133
|
0 |
0 |
unless not defined $mmf->{'afh'} or $mmf->{'afh'}->close
|
|
134
|
0 |
0 |
unless not defined $mmf->{'bfh'} or $mmf->{'bfh'}->close
|
|
177
|
0 |
0 |
unless $mmf->opened and fcwrite($mmf->{'flags'})
|
|
178
|
0 |
0 |
unless $mmf->dirty
|
|
181
|
0 |
0 |
unless $mmf->saveHeader
|
|
197
|
0 |
0 |
unless $afh->print(pack($pack_a, $bidx, $blen))
|
|
199
|
0 |
0 |
unless $bfh->print($_)
|
|
212
|
0 |
0 |
unless (caller 1)[3] =~ /::close$/
|
|
223
|
0 |
0 |
unless $mmf->opened
|
|
233
|
0 |
0 |
unless read($afh, $buf, $len_a) == $len_a
|
|
240
|
0 |
0 |
unless read($bfh, $buf, $blen) == $blen
|
|
244
|
0 |
0 |
if $mmf->dirty
|
|
269
|
0 |
0 |
if defined $base
|
|
270
|
0 |
0 |
unless $mmf->opened
|
|
271
|
0 |
0 |
unless $mmf->flush
|
|
293
|
0 |
0 |
if (not defined $hdr and (fcflags($mmf->{'flags'}) & 64) != 64) { }
|
|
|
0 |
0 |
elsif (defined $hdr) { }
|
|
317
|
0 |
0 |
unless ref $mmf
|
|
324
|
0 |
0 |
if /^%%/ or /^$/
|
|
351
|
0 |
0 |
if (defined $_)
|
|
356
|
0 |
0 |
$a2s ? :
|
|
|
0 |
0 |
$b2s ? :
|
|
377
|
0 |
0 |
UNIVERSAL::isa($_[0], 'ARRAY') ? :
|
|
389
|
0 |
0 |
unless defined $a
|
|
392
|
0 |
0 |
unless seek $mmf->{'afh'}, $a * $mmf->{'len_a'}, 0
|
|
395
|
0 |
0 |
unless read($mmf->{'afh'}, $buf, $mmf->{'len_a'}) == $mmf->{'len_a'}
|
|
400
|
0 |
0 |
unless seek $mmf->{'bfh'}, $boff, 0
|
|
402
|
0 |
0 |
unless read($mmf->{'bfh'}, $buf, $blen) == $blen
|