}
switch -exact -- $argv {
- {} { set mainkind test }
- --automatic { set mainkind automatic }
- default { error "huh $argv ?" }
+ {} { set mainkind test }
+ {--automatic 1} { set mainkind automatic }
+ {--automatic*} { error "incompatible versions - install problem" }
+ default { error "huh $argv ?" }
}
read_database