diff options
| author | Mattia Barbon <mbarbon@dsi.unive.it> | 2002-03-09 15:55:11 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-09 16:55:40 +0000 |
| commit | ffebc68c76e0689738334ed887c5b93d5d71a5f3 (patch) | |
| tree | 28ebbcf0d4784bc33af1387006b403ade61492f6 /ext/Socket | |
| parent | ed788108b1b0259026436a39b196a5f26a5ba262 (diff) | |
| download | perl-ffebc68c76e0689738334ed887c5b93d5d71a5f3.tar.gz | |
socketpair.t w/o fork
From: "Mattia Barbon" <mbarbon@dsi.unive.it>
Message-ID: <3C8A224F.29578.13691BA@localhost>
(modified as suggested by Sarathy)
p4raw-id: //depot/perl@15132
Diffstat (limited to 'ext/Socket')
| -rw-r--r-- | ext/Socket/socketpair.t | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/ext/Socket/socketpair.t b/ext/Socket/socketpair.t index 161a119a09..4e3f1714de 100644 --- a/ext/Socket/socketpair.t +++ b/ext/Socket/socketpair.t @@ -7,7 +7,10 @@ BEGIN { chdir 't' if -d 't'; @INC = '../lib'; require Config; import Config; - $can_fork = $Config{d_fork} || ($^O eq 'MSWin32' && $Config{useithreads}); + $can_fork = $Config{'d_fork'} + or ($^O eq 'MSWin32' and $Config{useithreads} + and $Config{ccflags} =~ /-DPERL_IMPLICIT_SYS/); + if ($^O eq "hpux" or $Config{'extensions'} !~ /\bSocket\b/ && !(($^O eq 'VMS') && $Config{d_socket})) { |