Adding test cases from grid chl
[occt.git] / tests / bugs / caf / bug158
1 puts "=============="
2 puts "OCC158"
3 puts "=============="
4
5 NewDocument D MDTV-Standard
6
7 ##################################################################
8 if { [catch {set res [SaveAs D ${imagedir}/OCC158.std]}] != 0 } {
9   puts "OCC158: Error"
10 } else {
11     file delete ${imagedir}/OCC158.std
12 }
13
14
15