mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
20 lines
229 B
Plaintext
Executable File
20 lines
229 B
Plaintext
Executable File
puts "==========="
|
|
puts "BUC60910"
|
|
puts "==========="
|
|
|
|
pload QAcommands
|
|
|
|
NewDocument D MDTV-Standard
|
|
UndoLimit D 100
|
|
|
|
NewCommand D
|
|
|
|
set ResultError [BUC60910 D]
|
|
if { ${ResultError} != 0 } {
|
|
puts "Error : 1"
|
|
}
|
|
|
|
NewCommand D
|
|
|
|
|