use Test::More 'no_plan';
-use Scalar::Vec::Util qw/SVU_SIZE/;
+use Scalar::Vec::Util;
eval { Scalar::Vec::Util::veq_pp(undef, 0, my $y, 0, 0) };
like($@, qr/Invalid\s+argument/, 'first argument undef croaks');
eval { Scalar::Vec::Util::veq_pp(my $x, 0, my $y, 0, undef) };
like($@, qr/Invalid\s+argument/, 'fifth argument undef croaks');
-my $p = SVU_SIZE;
-$p = 8 if $p < 8;
+my $p = 8;
my $n = 3 * $p;
my $q = 1;
-*myfill = *Scalar::Vec::Util::vfill_pp;
+sub myfill {
+ (undef, my $s, my $l, my $x) = @_;
+ $x = 1 if $x;
+ vec($_[0], $_, 1) = $x for $s .. $s + $l - 1;
+}
sub rst { myfill($_[0], 0, $n, 0) }