From a02a5408b2f199007c4dcb74559cc79066307ada Mon Sep 17 00:00:00 2001 From: Jim Cromie Date: Wed, 6 Jul 2005 08:19:53 -0600 Subject: Re: janitorial work ? [patch] Message-ID: <42CC3CE9.5050606@divsol.com> (reverted all dual-lived modules since they must work with older perls too so must wait for a new Devel::PPPort) p4raw-id: //depot/perl@25101 --- ext/POSIX/POSIX.xs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'ext/POSIX/POSIX.xs') diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 255be886bb..818e8618e2 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -586,7 +586,7 @@ new(packname = "POSIX::SigSet", ...) CODE: { int i; - New(0, RETVAL, 1, sigset_t); + Newx(RETVAL, 1, sigset_t); sigemptyset(RETVAL); for (i = 1; i < items; i++) sigaddset(RETVAL, SvIV(ST(i))); @@ -631,7 +631,7 @@ new(packname = "POSIX::Termios", ...) CODE: { #ifdef I_TERMIOS - New(0, RETVAL, 1, struct termios); + Newx(RETVAL, 1, struct termios); #else not_here("termios"); RETVAL = 0; @@ -1328,7 +1328,7 @@ sigaction(sig, optaction, oldaction = 0) sigset = INT2PTR(sigset_t*, tmp); } else { - New(0, sigset, 1, sigset_t); + Newx(sigset, 1, sigset_t); sv_setptrobj(*svp, sigset, "POSIX::SigSet"); } *sigset = oact.sa_mask; -- cgit v1.2.1