From a2d2734b69bfb1503d98474607a91f9f9580fbab Mon Sep 17 00:00:00 2001
From: das <das@noemail.net>
Date: Tue, 11 Mar 2008 22:22:56 +0000
Subject: 	* tests/fCmd.test (fCmd-9.4):		skip on Darwin 9
 (xfail).

FossilOrigin-Name: 24df368431a2d8d453643659f59be32d0adced75
---
 tests/fCmd.test | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/tests/fCmd.test b/tests/fCmd.test
index 41dc1b1..073ead1 100644
--- a/tests/fCmd.test
+++ b/tests/fCmd.test
@@ -10,7 +10,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: fCmd.test,v 1.57 2006/11/10 01:55:57 das Exp $
+# RCS: @(#) $Id: fCmd.test,v 1.58 2008/03/11 22:22:56 das Exp $
 #
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
@@ -36,6 +36,10 @@ if {[testConstraint unix]} {
     }
 }
 
+testConstraint darwin9 [expr {[testConstraint unix] &&
+	$tcl_platform(os) eq "Darwin" &&
+	int([string index $tcl_platform(osVersion) 0]) >= 9}]
+
 testConstraint fileSharing 0
 testConstraint notFileSharing 1
 testConstraint xdev 0
@@ -701,7 +705,7 @@ test fCmd-9.3 {file rename: comprehensive: file to new name} {notRoot testchmod}
     file rename tf2 tf4
     list [lsort [glob tf*]] [file writable tf3] [file writable tf4]
 } {{tf3 tf4} 1 0}
-test fCmd-9.4 {file rename: comprehensive: dir to new name} {unixOrPc notRoot testchmod} {
+test fCmd-9.4 {file rename: comprehensive: dir to new name} {unixOrPc notRoot testchmod !darwin9} {
     cleanup
     file mkdir td1 td2
     testchmod 555 td2
-- 
cgit v0.12