diff options
| author | sebres <sebres@users.sourceforge.net> | 2024-06-28 08:51:54 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2024-06-28 08:51:54 (GMT) |
| commit | ae5358f6fe663de5bec81d7e05f794eddd4962be (patch) | |
| tree | abd45126c6d66cb994a53c84ad8e46cbdb9b5ef8 | |
| parent | b0c785f76f50fe169bad4c32cc7b2e3a59fa3a19 (diff) | |
| parent | fbe2b0e20beb48392d7cae7f5a08d93d6df3586a (diff) | |
| download | tcl-ae5358f6fe663de5bec81d7e05f794eddd4962be.zip tcl-ae5358f6fe663de5bec81d7e05f794eddd4962be.tar.gz tcl-ae5358f6fe663de5bec81d7e05f794eddd4962be.tar.bz2 | |
merge 8.7
| -rw-r--r-- | tests/cmdAH.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/cmdAH.test b/tests/cmdAH.test index 7cae5c8..ed55c24 100644 --- a/tests/cmdAH.test +++ b/tests/cmdAH.test @@ -23,8 +23,8 @@ testConstraint testsetplatform [llength [info commands testsetplatform]] testConstraint testvolumetype [llength [info commands testvolumetype]] testConstraint testbytestring [llength [info commands testbytestring]] testConstraint time64bit [expr { - $::tcl_platform(pointerSize) >= 8 || - [llength [info command testsize]] && [testsize st_mtime] >= 8 + ([llength [info command testsize]] ? + [testsize st_mtime] : $::tcl_platform(pointerSize)) >= 8 }] testConstraint linkDirectory [expr { ![testConstraint win] || |