0031037: Foundation Classes - add class Message_PrinterSystemLog for printing message...
[occt.git] / tests / bugs / iges / bug22820
1 puts "================"
2 puts "OCC22820"
3 puts "================"
4 puts ""
5 #######################################################################################
6 # OCCT IGES writer loses plane information
7 ######################################################################################
8
9 box b 1 1 1
10 set b_info [dump b]
11 if { [regexp BSplineSurface ${b_info}] } {
12    puts "Error in dump b"
13 }
14
15 brepiges b ${imagedir}/22820.igs
16 igesbrep ${imagedir}/22820.igs bb *
17
18 set types_info [listtypes]
19 puts "types_info=${types_info}"
20 if { [regexp BSplineSurface ${types_info}] } {
21    puts "Error in listtypes"
22 }
23
24 igesbrep ${imagedir}/22820.igs bb *
25 set bb_info [dump bb]
26 if { [regexp BSplineSurface ${bb_info}] } {
27    puts "Error in dump bb"
28 }