develooper Front page | perl.perl5.porters | Postings from July 2001

Re: [PATCH ext/POSIX/POSIX.pm] Re: sigaction.t under QNX

From:
Nick Ing-Simmons
Date:
July 6, 2001 09:53
Subject:
Re: [PATCH ext/POSIX/POSIX.pm] Re: sigaction.t under QNX
Message ID:
20010706165232.2072.3@bactrian.ni-s.u-net.com
Jarkko Hietaniemi <jhi@iki.fi> writes:
>On Thu, Jul 05, 2001 at 01:34:51PM -0400, Norton Allen wrote:
>> exit 0
>> =============
>> 
>>   This patch addresses the fact that osset is used in a
>>   saved destructor after the local C scope has expired.
>>   I will gladly entertain a more elegant solution if it
>>   is warranted.
>
>Thanks, applied.

It may not matter but the patch is non-reentrant.
To make it so it should malloc() a save area and have restore free it.
(Is there a SAVE*() that does that ?)

>
>>      -Norton Allen
>> 
>> *** ../ORIG/perl-11148/ext/POSIX/POSIX.xs	Mon Jul  2 09:00:31 2001
>> --- perl-11148/ext/POSIX/POSIX.xs	Thu Jul  5 13:24:11 2001
>> ***************
>> *** 1185,1191 ****
>>   	    struct sigaction act;
>>   	    struct sigaction oact;
>>   	    sigset_t sset;
>> ! 	    sigset_t osset;
>>   	    POSIX__SigSet sigset;
>>   	    SV** svp;
>>   	    SV** sigsvp = hv_fetch(GvHVn(siggv),
>> --- 1185,1191 ----
>>   	    struct sigaction act;
>>   	    struct sigaction oact;
>>   	    sigset_t sset;
>> ! 	    static sigset_t osset;
>>   	    POSIX__SigSet sigset;
>>   	    SV** svp;
>>   	    SV** sigsvp = hv_fetch(GvHVn(siggv),
-- 
Nick Ing-Simmons
http://www.ni-s.u-net.com/




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