summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-05-12 21:52:39 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-05-12 21:52:39 (GMT)
commit4bcd912c0c9e28b99bb7b35ef3bb40e8f82b6fe5 (patch)
treed6817207a834b1496233dff277dd79a9ebd2051c /tests
parent19b4d8d7fb173813c59f7281e52922921ef9f3cb (diff)
parent06285d2a11026ced76b58653449e181fd48ac13c (diff)
downloadtcl-4bcd912c0c9e28b99bb7b35ef3bb40e8f82b6fe5.zip
tcl-4bcd912c0c9e28b99bb7b35ef3bb40e8f82b6fe5.tar.gz
tcl-4bcd912c0c9e28b99bb7b35ef3bb40e8f82b6fe5.tar.bz2
Restore the largefileSupport constraint on Darwin, where tests (chan)io-34.21
take an unbearable 90 seconds each to complete.
Diffstat (limited to 'tests')
-rw-r--r--tests/chanio.test2
-rw-r--r--tests/io.test2
2 files changed, 2 insertions, 2 deletions
diff --git a/tests/chanio.test b/tests/chanio.test
index 5b77f54..e53f059 100644
--- a/tests/chanio.test
+++ b/tests/chanio.test
@@ -44,7 +44,7 @@ namespace eval ::tcl::test::io {
# You need a *very* special environment to do some tests. In particular,
# many file systems do not support large-files...
- testConstraint largefileSupport 1
+ testConstraint largefileSupport [expr {$::tcl_platform(os) ne "Darwin"}]
# some tests can only be run is umask is 2 if "umask" cannot be run, the
# tests will be skipped.
diff --git a/tests/io.test b/tests/io.test
index a072bd4..d05b882 100644
--- a/tests/io.test
+++ b/tests/io.test
@@ -45,7 +45,7 @@ testConstraint thread [expr {0 == [catch {package require Thread 2.7-}]}]
# You need a *very* special environment to do some tests. In
# particular, many file systems do not support large-files...
-testConstraint largefileSupport 1
+testConstraint largefileSupport [expr {$::tcl_platform(os) ne "Darwin"}]
# some tests can only be run is umask is 2
# if "umask" cannot be run, the tests will be skipped.