4 lines
52 B
Tcl
4 lines
52 B
Tcl
|
if {$problem} {
|
||
|
|
error "some problem occurred"
|
||
|
|
}
|