Change 20061 by [EMAIL PROTECTED] on 2003/07/07 18:26:35
The nanosleep() probe was kaputt, fixed by Mark Bixby.
Affected files ...
... //depot/perl/ext/Time/HiRes/Makefile.PL#16 edit
Differences ...
==== //depot/perl/ext/Time/HiRes/Makefile.PL#16 (text) ====
Index: perl/ext/Time/HiRes/Makefile.PL
--- perl/ext/Time/HiRes/Makefile.PL#15~20043~ Sun Jul 6 21:36:22 2003
+++ perl/ext/Time/HiRes/Makefile.PL Mon Jul 7 11:26:35 2003
@@ -129,9 +129,7 @@
$cccmd = "$Config{'cc'} -o $tmp $ccflags $tmp.c @$LIBS $errornull"
unless defined $cccmd;
- if ($^O eq 'mpeix') {
- $cccmd = 'MPEAUTOCONF=1 '.$cccmd;
- } elsif ($^O eq 'VMS') {
+ if ($^O eq 'VMS') {
open( CMDFILE, ">$tmp.com" );
print CMDFILE "\$ SET MESSAGE/NOFACILITY/NOSEVERITY/NOIDENT/NOTEXT\n";
print CMDFILE "\$ $cccmd\n";
@@ -336,8 +334,10 @@
print "Looking for nanosleep()... ";
my $has_nanosleep;
if (exists $Config{d_nanosleep}) {
- $has_nanosleep++ if $Config{d_nanosleep};
- $DEFINE .= ' -DTIME_HIRES_NANOSLEEP';
+ if ($Config{d_nanosleep}) {
+ $has_nanosleep++;
+ $DEFINE .= ' -DTIME_HIRES_NANOSLEEP';
+ }
} elsif (has_x ("nanosleep (NULL, NULL)")) {
$has_nanosleep++;
$DEFINE .= ' -DTIME_HIRES_NANOSLEEP';
End of Patch.