diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-08-13 07:21:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-08-13 07:21:34 (GMT) |
| commit | 840355939de3409373a08bc3c0c216916d74521f (patch) | |
| tree | eeedc61fe0101acf57a84b3bd0273e1303de8bc0 /tests/event.test | |
| parent | 52549ae747613994a8ced4de9b567bc4cc09443f (diff) | |
| download | tcl-840355939de3409373a08bc3c0c216916d74521f.zip tcl-840355939de3409373a08bc3c0c216916d74521f.tar.gz tcl-840355939de3409373a08bc3c0c216916d74521f.tar.bz2 | |
Testcase event-1.1 (still) fails occasionally on macOS
Diffstat (limited to 'tests/event.test')
| -rw-r--r-- | tests/event.test | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/event.test b/tests/event.test index b42909c..70d4cff 100644 --- a/tests/event.test +++ b/tests/event.test @@ -23,11 +23,12 @@ testConstraint testfilehandler [llength [info commands testfilehandler]] testConstraint testexithandler [llength [info commands testexithandler]] testConstraint testfilewait [llength [info commands testfilewait]] testConstraint exec [llength [info commands exec]] - +testConstraint notOSX [expr {$::tcl_platform(os) ne "Darwin"}] + test event-1.1 {Tcl_CreateFileHandler, reading} -setup { testfilehandler close set result "" -} -constraints testfilehandler -body { +} -constraints {testfilehandler notOSX} -body { testfilehandler create 0 readable off testfilehandler clear 0 testfilehandler oneevent |