Posted to tcl by bch at Mon Oct 09 18:49:52 GMT 2023view pretty

Driver
------
#!/usr/bin/env tclsh

package require tcltest
namespace import tcltest::*

verbose [ list body error skip ]
testConstraint agent true
limitConstraints true

runAllTests
cleanupTests

Relevant test
-------------
package require tcltest
namespace import tcltest::*

test agent-1.1 { agent support } -constraints [ list agent ] -setup {
  elided
} -cleanup {
} -body {
  set x hi
} -result hi

cleanupTests