From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 7 Aug 2003 06:24:23 +0000 (+0000)
Subject: If no alarm(), skip the subtests.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9ec6fbe5dfefdf8245187e5b0d3bbfc3ff99b66d;p=p5sagit%2Fp5-mst-13.2.git

If no alarm(), skip the subtests.

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

diff --git a/ext/Time/HiRes/t/HiRes.t b/ext/Time/HiRes/t/HiRes.t
index 9f6239a..3afefbe 100644
--- a/ext/Time/HiRes/t/HiRes.t
+++ b/ext/Time/HiRes/t/HiRes.t
@@ -131,7 +131,7 @@ else {
     ok 11, $f > 0.4 && $f < 0.9, "slept $f instead of 0.5 secs.";
 }
 
-if (!$have_ualarm) {
+if (!$have_ualarm || !$Config{d_alarm}) {
     skip 12..13;
 }
 else {