From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 21 Aug 2003 04:35:54 +0000 (+0000)
Subject: MPE/iX does not have nanosleep() (the test makes
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c077e42241e3d5377a0e2cabae1cede852824d7c;p=p5sagit%2Fp5-mst-13.2.git

MPE/iX does not have nanosleep() (the test makes
a wrong conclusion of the linking succeeding)

p4raw-id: //depot/perl@20794
---

diff --git a/ext/Time/HiRes/Makefile.PL b/ext/Time/HiRes/Makefile.PL
index f9b5550..fc6a155 100644
--- a/ext/Time/HiRes/Makefile.PL
+++ b/ext/Time/HiRes/Makefile.PL
@@ -338,7 +338,8 @@ EOD
 	    $has_nanosleep++;
 	    $DEFINE .= ' -DTIME_HIRES_NANOSLEEP';
 	}
-    } elsif (has_x ("nanosleep (NULL, NULL)")) {
+    } elsif ($^O ne 'mpeix' && # MPE/iX falsely finds nanosleep.
+             has_x ("nanosleep (NULL, NULL)")) {
 	$has_nanosleep++;
 	$DEFINE .= ' -DTIME_HIRES_NANOSLEEP';
     }