develooper Front page | perl.perl5.porters | Postings from November 2003

[PATCH blead] reentr.pl is not defining _srandom_struct

Thread Next
From:
Jan Dubois
Date:
November 4, 2003 16:59
Subject:
[PATCH blead] reentr.pl is not defining _srandom_struct
Message ID:
45igqvsus3hr8bno3si087j5qnrqvn79bf@4ax.com
It looks like reentr.pl never defined an entry in REENTR for _srandom_struct.
Nobody noticed because (I assume) nobody uses srandom() in an extension, and
core Perl doesn't use it either.

The patch for 5.8.2-to-be is a little more complex to maintain binary
compatibility.  I'll send it in a separate message.

Cheers,
-Jan

PS: Don't forget to rerun reentr.pl and check in modified reentr.c and
reentr.h as well.

--- reentr.orig Mon Nov 03 12:39:06 2003
+++ reentr.pl   Tue Nov 04 16:44:44 2003
@@ -469,7 +469,7 @@
 EOF
            pushssif $endif;
        }
-        elsif ($func =~ /^(drand48|gmtime|localtime|random)$/) {
+        elsif ($func =~ /^(drand48|gmtime|localtime|random|srandom)$/) {
            pushssif $ifdef;
            push @struct, <<EOF;
        $seent{$func} _${func}_struct;

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About