From: Dominic Dunlop <domo@computer.org>
Date: Sun, 9 Jul 2006 22:22:14 +0000 (+0200)
Subject: Skip tests of a POSIX constant on Mac OS X because saved IDs are borked
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2abaefe1a859c68ca70c6b3e4f109226c6a36eb8;p=p5sagit%2Fp5-mst-13.2.git

Skip tests of a POSIX constant on Mac OS X because saved IDs are borked
Message-Id: <F1942C06-CDE3-47C6-AC5A-4358960E0F6E@mac.com>

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

diff --git a/ext/POSIX/t/sysconf.t b/ext/POSIX/t/sysconf.t
index 15dd65e..1fa2eb1 100644
--- a/ext/POSIX/t/sysconf.t
+++ b/ext/POSIX/t/sysconf.t
@@ -122,9 +122,13 @@ unlink($fifo);
 
 # testing sysconf()
 for my $constant (@sys_consts) {
-    $r = eval { sysconf( eval "$constant()" ) };
-    is( $@, '', "calling sysconf($constant)" );
-    ok( defined $r, "\tchecking that the returned value is defined: $r" );
-    ok( looks_like_number($r), "\tchecking that the returned value looks like a number" );
+ SKIP: {
+	skip "Saved IDs broken on Mac OS X (Perl #24122)", 3
+	    if $^O eq 'darwin' && $constant eq '_SC_SAVED_IDS';
+	$r = eval { sysconf( eval "$constant()" ) };
+	is( $@, '', "calling sysconf($constant)" );
+	ok( defined $r, "\tchecking that the returned value is defined: $r" );
+	ok( looks_like_number($r), "\tchecking that the returned value looks like a number" );
+    }
 }