* tests/clock.test: Commented clock-9.1 that the test will fail

if strftime doesn't do %s.  Modernized the use of test constraints.

1 files changed, 8 insertions, 2 deletions

diff --git a/tests/clock.test b/tests/clock.test
index 5c01e5e..2599dd7 100644
--- a/tests/clock.test
+++ b/tests/clock.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: clock.test,v 1.22.2.4 2004/05/27 18:25:46 kennykb Exp $
+# RCS: @(#) $Id: clock.test,v 1.22.2.5 2004/05/27 18:43:19 kennykb Exp $
 
 set env(LC_TIME) POSIX
 
@@ -465,11 +465,17 @@ test clock-8.1 {clock scan midnight/gmt range bug 413397} {
 	    [clock format [clock scan year -base $5amPST -gmt 1] -format $fmt]
 } {12/31 12/31}
 
-set ::tcltest::testConstraints(needPST) [expr {
+::tcltest::testConstraint needPST [expr {
     [regexp {^(Pacific.*|P[DS]T)$} [clock format 1 -format %Z]]
     && ([clock format 1 -format %s] != "%s")
 }]
+
 test clock-9.1 {%s gmt testing} {needPST} {
+
+    # Note that this test will fail if the strftime on the underlying
+    # system doesn't support the %s format group.  Systems that are known
+    # to have trouble include the native C libraries on AIX and HP-UX
+
     # We need PST to guarantee the difference value below, and %s isn't
     # valid on all OSes (like Solaris).
     set s 100000