diff options
author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2003-06-14 10:49:57 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-15 17:08:02 +0000 |
commit | 622913ab81739f4a9419ed541a122ff2495c8ab1 (patch) | |
tree | 06a71ddf809f0904979a43c23c68dae3939718db /ext/Time | |
parent | 41be1fbddbbc49a5c34acad74f2905b11dd0ced0 (diff) | |
download | perl-622913ab81739f4a9419ed541a122ff2495c8ab1.tar.gz |
OS2 patches
Message-ID: <20030615004956.GA28272@math.berkeley.edu>
p4raw-id: //depot/perl@19789
Diffstat (limited to 'ext/Time')
-rw-r--r-- | ext/Time/HiRes/Makefile.PL | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/ext/Time/HiRes/Makefile.PL b/ext/Time/HiRes/Makefile.PL index dfcbce3a17..83433075cf 100644 --- a/ext/Time/HiRes/Makefile.PL +++ b/ext/Time/HiRes/Makefile.PL @@ -14,6 +14,8 @@ my $DEFINE; my $LIBS; my $XSOPT; +my $ld_exeext = ($^O eq 'os2' and $Config{ldflags} =~ /-Zexe\b/) ? '.exe' : ''; + unless($ENV{PERL_CORE}) { $ENV{PERL_CORE} = 1 if grep { $_ eq 'PERL_CORE=1' } @ARGV; } @@ -139,10 +141,11 @@ sub try_compile_and_link { } else { + my $tmp_exe = "$tmp$ld_exeext"; printf "cccmd = $cccmd\n" if $VERBOSE; - system($cccmd); - $ok = -s $tmp && -x _; - unlink("$tmp.c", $tmp); + my $res = system($cccmd); + $ok = defined($res) && $res==0 && -s $tmp_exe && -x _; + unlink("$tmp.c", $tmp_exe); } } @@ -367,7 +370,8 @@ EOD print "You can mix subsecond sleeps with signals.\n"; } else { print "NOT found.\n"; - print "You cannot mix subsecond sleeps with signals.\n"; + my $nt = ($^O eq 'os2' ? '' : 'not'); + print "You can$nt mix subsecond sleeps with signals.\n"; } if ($DEFINE) { |