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

Re: [perl #20491] $SIG{RTMIN} on gentoo

Thread Previous | Thread Next
From:
Shevek
Date:
February 5, 2003 09:30
Subject:
Re: [perl #20491] $SIG{RTMIN} on gentoo
Message ID:
Pine.LNX.4.44.0302051725430.8552-100000@localhost.localdomain
Thanks for the suggestions so far. I have now applied the temporary fix as
suggested. It still segfaults, even though RTMIN is now 32...

Did I mess up anywhere? I changed in config.sh sig_name, sig_name_init,
sig_num_init and sig_size to the following:

root@p405u /usr/local/src/perl-5.8.0$ perl -V:sig.*
sig_name='ZERO HUP INT QUIT ILL TRAP ABRT BUS FPE KILL USR1 SEGV USR2 PIPE 
ALRM TERM STKFLT CHLD CONT STOP TSTP TTIN TTOU URG XCPU XFSZ VTALRM PROF 
WINCH IO PWR SYS RTMIN NUM33 NUM34 NUM35 NUM36 NUM37 NUM38 NUM39 NUM40 
NUM41 NUM42 NUM43 NUM44 NUM45 NUM46 NUM47 NUM48 NUM49 NUM50 NUM51 NUM52 
NUM53 NUM54 NUM55 NUM56 NUM57 NUM58 NUM59 NUM60 NUM61 NUM62 RTMAX IOT CLD 
POLL UNUSED '
sig_num='0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 
50 51 52 53 54 55 56 57 58 59 60 61 62 63 6 17 29 31 '
sig_count='64'
sig_name_init='"ZERO", "HUP", "INT", "QUIT", "ILL", "TRAP", "ABRT", "BUS", 
"FPE", "KILL", "USR1", "SEGV", "USR2", "PIPE", "ALRM", "TERM", "STKFLT", 
"CHLD", "CONT", "STOP", "TSTP", "TTIN", "TTOU", "URG", "XCPU", "XFSZ", 
"VTALRM", "PROF", "WINCH", "IO", "PWR", "SYS", "RTMIN", "NUM33", "NUM34", 
"NUM35", "NUM36", "NUM37", "NUM38", "NUM39", "NUM40", "NUM41", "NUM42", 
"NUM43", "NUM44", "NUM45", "NUM46", "NUM47", "NUM48", "NUM49", "NUM50", 
"NUM51", "NUM52", "NUM53", "NUM54", "NUM55", "NUM56", "NUM57", "NUM58", 
"NUM59", "NUM60", "NUM61", "NUM62", "RTMAX", "IOT", "CLD", "POLL", 
"UNUSED", 0'
sig_num_init='0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 
53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 6, 17, 29, 31, 0'
sig_size='68'
signal_t='void'
root@p405u /usr/local/src/perl-5.8.0$ perl -e '$SIG{NUM33}="DEFAULT";'
root@p405u /usr/local/src/perl-5.8.0$ perl -e '$SIG{NUM34}="DEFAULT";'
root@p405u /usr/local/src/perl-5.8.0$ perl -e '$SIG{RTMIN}="DEFAULT";'
Segmentation fault
root@p405u /usr/local/src/perl-5.8.0$ perl -e '$SIG{NUM31}="DEFAULT";'
root@p405u /usr/local/src/perl-5.8.0$ 




-- 
Shevek
I am the Borg.

sub AUTOLOAD{my$i=$AUTOLOAD;my$x=shift;$i=~s/^.*://;print"$x\n";eval
qq{*$AUTOLOAD=sub{my\$x=shift;return unless \$x%$i;&{$x}(\$x);};};}

foreach my $i (3..65535) { &{'2'}($i); }


Thread Previous | 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