summaryrefslogtreecommitdiff
path: root/Examples/test-suite/tcl/enum_thorough_runme.tcl
blob: d4cc1995a9fbc93513580f4adf815da67693f332 (plain)
1
2
3
4
5
6
7
8
9

if [ catch { load ./enum_thorough[info sharedlibextension] enum_thorough} err_msg ] {
	puts stderr "Could not load shared object:\n$err_msg"
}

if { [speedTest0 $SpeedClass_slow] != $SpeedClass_slow } { puts stderr "speedTest0 failed" }
if { [speedTest4 $SpeedClass_slow] != $SpeedClass_slow } { puts stderr "speedTest4 failed" }
if { [speedTest5 $SpeedClass_slow] != $SpeedClass_slow } { puts stderr "speedTest5 failed" }