diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-07-22 10:11:05 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-07-22 10:11:05 (GMT) |
commit | f9820a2863b758aa1d07274355cd62f9ecbddae1 (patch) | |
tree | b7208dd7d40605721eb0d50d273302ed2cd5f348 | |
parent | 978b54229dc68812a5ccaa0050324d215db91520 (diff) | |
download | tcl-f9820a2863b758aa1d07274355cd62f9ecbddae1.zip tcl-f9820a2863b758aa1d07274355cd62f9ecbddae1.tar.gz tcl-f9820a2863b758aa1d07274355cd62f9ecbddae1.tar.bz2 |
Test-case should pass on Darwin or with non-threaded build as well.
-rw-r--r-- | tests/unixForkEvent.test | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/tests/unixForkEvent.test b/tests/unixForkEvent.test index fee45fd..a0c3f19 100644 --- a/tests/unixForkEvent.test +++ b/tests/unixForkEvent.test @@ -1,7 +1,6 @@ # This file contains a collection of tests for the procedures in the file -# tclEvent.c, which includes the "update", and "vwait" Tcl -# commands. Sourcing this file into Tcl runs the tests and generates -# output for errors. No output means no errors were found. +# tclUnixNotify.c. Sourcing this file into Tcl runs the tests and +# generates output for errors. No output means no errors were found. # # Copyright (c) 1995-1997 Sun Microsystems, Inc. # Copyright (c) 1998-1999 by Scriptics Corporation. @@ -13,15 +12,11 @@ package require tcltest 2 namespace import -force ::tcltest::* testConstraint testfork [llength [info commands testfork]] -testConstraint threaded [expr { - ([info exist tcl_platform(threaded)] && $tcl_platform(threaded)) - && $tcl_platform(os) ne "Darwin" -}] # Test if the notifier thread is well initialized in a forked interpreter # by Tcl_InitNotifier test unixforkevent-1.1 {fork and test writeable event} \ - -constraints {threaded testfork} \ + -constraints testfork \ -body { set folder [makeDirectory unixtestfork] set pid [testfork] |