Skip to content

Commit a370c14

Browse files
committed
makedef.pl changes for wellrng (squash me)
1 parent a2de3a5 commit a370c14

File tree

1 file changed

+14
-0
lines changed

1 file changed

+14
-0
lines changed

makedef.pl

+14
Original file line numberDiff line numberDiff line change
@@ -673,6 +673,20 @@ sub readvar {
673673
);
674674
}
675675

676+
if ($define{PERL_USE_WELL512A_RNG}) {
677+
++$skip{$_} foreach qw(
678+
Perl_drand01_wellrng512a_r
679+
Perl_wellrng512a_init_r
680+
Perl_wellrng512a_u_r
681+
);
682+
} else {
683+
++$skip{$_} foreach qw(
684+
Perl_drand48_init_r
685+
Perl_drand48_r
686+
687+
);
688+
}
689+
676690
# functions from *.sym files
677691

678692
my @syms = qw(globvar.sym);

0 commit comments

Comments
 (0)