Lines Matching refs:nrecs
427 my ($self, $pos, $nrecs, @data) = @_;
433 # Also set default for $nrecs
436 $nrecs = $oldsize unless defined $nrecs;
452 if ($nrecs < 0) {
453 $nrecs = $oldsize - $pos + $nrecs;
454 $nrecs = 0 if $nrecs < 0;
457 # nrecs is too big---it really means "until the end"
459 if ($nrecs + $pos > $oldsize) {
460 $nrecs = $oldsize - $pos;
470 for ($pos .. $pos+$nrecs-1) {
485 $self->_fill_offsets_to($pos+$nrecs);
490 $self->_oadjust([$pos, $nrecs, @data]);
499 for ($pos .. $pos+$nrecs-1) {
513 my @oldkeys = grep $_ >= $pos + $nrecs, $self->{cache}->ckeys;
514 my @newkeys = map $_-$nrecs+@data, @oldkeys;
739 # [$pos, $nrecs, @length] items
740 # indicating that $nrecs records were removed at $recpos (a record offset)
752 my ($pos, $nrecs, @data) = @$_;
773 for my $i ($pos .. $pos+$nrecs-1) {
790 splice @{$self->{offsets}}, $pos, $nrecs+1, @newoff;
794 $delta_recs += @data - $nrecs; # net change in total number of records