if {$problem} {
# Print a “friendly” message...
puts stderr "some problem occurred"
# Indicate to the caller of the program that there was a problem
exit 1
}