mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-08-10 00:02:41 +08:00
5747059b21
Created command checkview for displaying shapes.
16 lines
235 B
Plaintext
Executable File
16 lines
235 B
Plaintext
Executable File
|
|
puts "========"
|
|
puts "BUC60842"
|
|
puts "========"
|
|
|
|
pload QAcommands
|
|
vinit
|
|
|
|
if [catch {BUC60842} catch_result] {
|
|
puts "Faulty BUC60842"
|
|
} else {
|
|
puts "BUC60842 OK"
|
|
}
|
|
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|