Change 20131 by [EMAIL PROTECTED] on 2003/07/10 22:42:29
&Time::HiRes::d_nanosleep was broken.
Affected files ...
... //depot/perl/ext/Time/HiRes/Makefile.PL#17 edit
Differences ...
==== //depot/perl/ext/Time/HiRes/Makefile.PL#17 (text) ====
Index: perl/ext/Time/HiRes/Makefile.PL
--- perl/ext/Time/HiRes/Makefile.PL#16~20061~ Mon Jul 7 11:26:35 2003
+++ perl/ext/Time/HiRes/Makefile.PL Thu Jul 10 15:42:29 2003
@@ -404,7 +404,11 @@
foreach (qw (d_usleep d_ualarm d_gettimeofday d_getitimer d_setitimer
d_nanosleep)) {
my $macro = $_;
- $macro =~ s/d_(.*)/HAS_\U$1/;
+ if ($macro eq 'd_nanosleep') {
+ $macro =~ s/d_(.*)/TIME_HIRES_\U$1/;
+ } else {
+ $macro =~ s/d_(.*)/HAS_\U$1/;
+ }
push @names, {name => $_, macro => $macro, value => 1,
default => ["IV", "0"]};
}
End of Patch.
