mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
d99f0355e3
Draw_Interpretor, CommandCmd() - catched exceptions and messages put into Tcl string result before throwing a Tcl exception (return 1) are now print in intense red (using Message::SendFail()). Duplication of exception message in std::cout and Tcl output has been removed. Draw Harness plugins have been updated to use either Message::SendFail() or theDI instead of std::cout/std::cerr for printing colored error message before throwing a Tcl exception.
15 lines
367 B
Plaintext
15 lines
367 B
Plaintext
puts "TODO OCC23497 ALL: exception"
|
|
|
|
puts "============"
|
|
puts "0023497: Units package raises e x c e p t i o n for composite units"
|
|
puts "============"
|
|
puts ""
|
|
|
|
set UnitString "sq.km"
|
|
|
|
if [catch {unitconvtoSI 1 ${UnitString}} res] {
|
|
puts "Error: Units package raises exception for composite units"
|
|
} else {
|
|
puts "OK: Units package work good for composite unit"
|
|
}
|