We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent b2f2f94 commit 7f22457Copy full SHA for 7f22457
makedef.pl
@@ -673,6 +673,19 @@ sub readvar {
673
);
674
}
675
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
684
+ Perl_drand48_init_r
685
+ Perl_drand48_r
686
687
+}
688
+
689
# functions from *.sym files
690
691
my @syms = qw(globvar.sym);
0 commit comments