summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/unixForkEvent.test11
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]