2009-06-14 15:20:38 +02:00

22 lines
241 B
Plaintext

proc setup {} {
save_env
}; # setup()
proc teardown {} {
assert_env_unmodified
}; # teardown()
setup
set options {--wipe -s --start= -e --end= -q --quiet -h --help}
assert_complete $options "arch -"
sync_after_int
teardown