diff options
Diffstat (limited to 'tests/tcltests.tcl')
| -rw-r--r-- | tests/tcltests.tcl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/tests/tcltests.tcl b/tests/tcltests.tcl index f7597b5..2105279 100644 --- a/tests/tcltests.tcl +++ b/tests/tcltests.tcl @@ -1,3 +1,11 @@ #! /usr/bin/env tclsh -testConstraint notValgrind [expr {![testConstraint valgrind]}] +package require tcltest 2.2 +namespace import -force ::tcltest::* + +testConstraint exec [llength [info commands exec]] +testConstraint fcopy [llength [info commands fcopy]] +testConstraint fileevent [llength [info commands fileevent]] +testConstraint thread [ + expr {0 == [catch {package require Thread 2.7-}]}] +testConstraint notValgrind [expr {![testConstraint valgrind]}] |