mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-08 18:40:55 +03:00
34 lines
571 B
Plaintext
Executable File
34 lines
571 B
Plaintext
Executable File
if { [isdraw result] } {
|
|
if { [info exists 2dviewer] } {
|
|
clear
|
|
smallview
|
|
donly result
|
|
fit
|
|
xwd $imagedir/${test_image}.png
|
|
}
|
|
if { [info exists 3dviewer] } {
|
|
vinit
|
|
vclear
|
|
vdisplay result
|
|
vsetdispmode 1
|
|
vfit
|
|
vdump $imagedir/${test_image}.png
|
|
}
|
|
} else {
|
|
if { [info exists 3dviewer] } {
|
|
if { ${3dviewer} == 2 } {
|
|
vdump $imagedir/${test_image}.png
|
|
}
|
|
}
|
|
}
|
|
if { [info exist only_xwd] } {
|
|
xwd $imagedir/${test_image}.png
|
|
}
|
|
#} else {
|
|
# puts "Error : The command can not be build."
|
|
#}
|
|
|
|
# to end a test script
|
|
puts "TEST COMPLETED"
|
|
|