diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-12 20:13:06 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-12 20:13:06 +0000 |
| commit | fdfddb36b71daa065b87b70cd0b0355d51a15a6c (patch) | |
| tree | 1d9b24a9f7a51e7360c2a5d6433f81e684b1d3ab /ext/POSIX | |
| parent | c769dab1330c7d1180df42fa9bea6c7173b1d743 (diff) | |
| download | perl-fdfddb36b71daa065b87b70cd0b0355d51a15a6c.tar.gz | |
VMS pre-7.0 (which doesn't have sigaction()) uniformly
mishandles kill(), and therefore the sigaction test
should be skipped, from Charles Lane.
p4raw-id: //depot/perl@12415
Diffstat (limited to 'ext/POSIX')
| -rw-r--r-- | ext/POSIX/t/sigaction.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/POSIX/t/sigaction.t b/ext/POSIX/t/sigaction.t index 1045db6c3c..55a4d3beee 100644 --- a/ext/POSIX/t/sigaction.t +++ b/ext/POSIX/t/sigaction.t @@ -7,8 +7,9 @@ BEGIN { BEGIN{ # Don't do anything if POSIX is missing, or sigaction missing. + use Config; eval { use POSIX; }; - if($@ || $^O eq 'MSWin32' || $^O eq 'NetWare') { + if($@ || $^O eq 'MSWin32' || $^O eq 'NetWare' || ($^O eq 'VMS' && !$Config{'d_sigaction'})) { print "1..0\n"; exit 0; } |