0023410: QA commands don't work properly in new testing system
[occt.git] / tests / bugs / end
CommitLineData
fa920fb1 1if { [isdraw result] } {
2 if { [info exists 2dviewer] } {
3 clear
4 smallview
5 donly result
6 fit
7 xwd $imagedir/${test_image}.gif
8 }
9 if { [info exists 3dviewer] } {
319e4241 10 vinit
fa920fb1 11 vclear
12 vdisplay result
13 vsetdispmode 1
14 vfit
15 vdump $imagedir/${test_image}.gif
16 }
319e4241 17 if { [info exist only_xwd] } {
18 xwd $imagedir/${test_image}.gif
19 }
20#} else {
21# puts "Error : The command can not be build."
22#}
fa920fb1 23
24# to end a test script
25puts "TEST COMPLETED"
26