mirror of
https://github.com/The-OpenROAD-Project/OpenROAD.git
synced 2026-06-02 01:08:34 +08:00
11 lines
223 B
Tcl
11 lines
223 B
Tcl
# error handling
|
|
if { [catch { utl::error ORD 1 "catch a luser" } result] } {
|
|
puts "caught '$result'"
|
|
}
|
|
|
|
if { [catch { read_def xxx } result] } {
|
|
puts "caught '$result'"
|
|
}
|
|
|
|
catch { utl::error ORD 1"last chance" } error
|