diff options
| author | Jan Dubois <jand@activestate.com> | 2005-05-13 05:21:40 -0700 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-02-12 18:25:07 +0000 |
| commit | 3fb2f3ac5c8ed8e4fdad7a9dbbce30a09d4f93f7 (patch) | |
| tree | 23e7b218347ccaae8933270261474f57b3985fdc /reentr.pl | |
| parent | 4deaaa807edd632ac36b986b1b622f1f9fb7673f (diff) | |
| download | perl-3fb2f3ac5c8ed8e4fdad7a9dbbce30a09d4f93f7.tar.gz | |
Integrate:
[ 24458]
Fix from Steve Peters
[ 24464]
Subject: RE: 5.8.7-tobe fails to compile on AIX 4.3.3
From: "Jan Dubois" <jand@ActiveState.com>
Message-Id: <200505131921.j4DJLgG5007986@smtp3.ActiveState.com>
and then regenerate reentr.h, with the , no longer inside
REENTR_MEMZERO(). This keeps macros looking like functions.
p4raw-link: @24464 on //depot/maint-5.8/perl: 65af2a75d112159ec53912329b2e01abfb9a3fb4
p4raw-link: @24458 on //depot/maint-5.8/perl: ef0ef25c116d419e8978d636281fda0a90743c2a
p4raw-id: //depot/perl@30235
p4raw-integrated: from //depot/maint-5.8/perl@24464 'edit in' reentr.pl
(@24458..)
Diffstat (limited to 'reentr.pl')
| -rw-r--r-- | reentr.pl | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -110,9 +110,9 @@ print <<EOF; * memzero out certain structures before calling the functions. */ #if defined(__OpenBSD__) -# define REENTR_MEMZERO(a,b) memzero(a,b), +# define REENTR_MEMZERO(a,b) memzero(a,b) #else -# define REENTR_MEMZERO(a,b) +# define REENTR_MEMZERO(a,b) 0 #endif #ifdef NETDB_R_OBSOLETE @@ -725,7 +725,7 @@ EOF my $memzero = ''; if($p =~ /D$/ && ($genfunc eq 'protoent' || $genfunc eq 'servent')) { - $memzero = 'REENTR_MEMZERO(&PL_reentrant_buffer->_' . $genfunc . '_data, sizeof(PL_reentrant_buffer->_' . $genfunc . '_data))'; + $memzero = 'REENTR_MEMZERO(&PL_reentrant_buffer->_' . $genfunc . '_data, sizeof(PL_reentrant_buffer->_' . $genfunc . '_data)),'; } push @wrap, <<EOF; # if !defined($func) && ${FUNC}_R_PROTO == REENTRANT_PROTO_$p |