diff options
| author | Robin Barker <RMBarker@cpan.org> | 1999-09-13 15:15:11 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-13 13:23:04 +0000 |
| commit | 564319723c2c18fa4801cd77e0d203a582b4d5a3 (patch) | |
| tree | 94b6775a09b4e1758847fd3b22587eeae744317b /ext/POSIX | |
| parent | 23614c1f233bf6c8f35366cee6be53ae80af0e28 (diff) | |
| download | perl-564319723c2c18fa4801cd77e0d203a582b4d5a3.tar.gz | |
Replace change #4100 with
To: gsar@activestate.com
Cc: perl5-porters@perl.org
Subject: Re: [ID 19990907.004] [PATCH perl5.005_61] compiler warnings with -Duse64bits
Message-Id: <199909131315.OAA24012@tempest.npl.co.uk>
p4raw-link: @4100 on //depot/cfgperl: 427181846486e3aa5034a647dc1922377185f4c0
p4raw-id: //depot/cfgperl@4136
Diffstat (limited to 'ext/POSIX')
| -rw-r--r-- | ext/POSIX/POSIX.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 0f09aace1a..16217f0936 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -3246,7 +3246,7 @@ sigaction(sig, action, oldaction = 0) } else { New(0, sigset, 1, sigset_t); - sv_setptrobj(*svp, PTR_CAST sigset, "POSIX::SigSet"); + sv_setptrobj(*svp, sigset, "POSIX::SigSet"); } *sigset = oact.sa_mask; @@ -3274,7 +3274,7 @@ INIT: } else if (sv_derived_from(ST(2), "POSIX::SigSet")) { IV tmp = SvIV((SV*)SvRV(ST(2))); - oldsigset = (POSIX__SigSet)PTR_CAST tmp; + oldsigset = INT2PTR(POSIX__SigSet,tmp); } else { New(0, oldsigset, 1, sigset_t); |