diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-24 22:20:42 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-24 22:20:42 +0000 |
| commit | f4c556ac9d141bf86702c68d95acad2db5ec6874 (patch) | |
| tree | d8f4ef6b026f71b605caa1a4475b5559d30b5039 /ext | |
| parent | 1ba752a043289c0682ba096aba08751ac71b298a (diff) | |
| download | perl-f4c556ac9d141bf86702c68d95acad2db5ec6874.tar.gz | |
remove unused interpreter globals
p4raw-id: //depot/perl@4448
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/POSIX/POSIX.xs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index dbf2621669..6fc32b1bd5 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -3369,15 +3369,13 @@ sigaction(sig, action, oldaction = 0) # This code is really grody because we're trying to make the signal # interface look beautiful, which is hard. - if (!PL_siggv) - gv_fetchpv("SIG", TRUE, SVt_PVHV); - { + GV *siggv = gv_fetchpv("SIG", TRUE, SVt_PVHV); struct sigaction act; struct sigaction oact; POSIX__SigSet sigset; SV** svp; - SV** sigsvp = hv_fetch(GvHVn(PL_siggv), + SV** sigsvp = hv_fetch(GvHVn(siggv), PL_sig_name[sig], strlen(PL_sig_name[sig]), TRUE); |