b8f2022f |
1 | puts "==========" |
2 | puts "OCC25176" |
3 | puts "==========" |
4 | puts "" |
5 | ###################################################################### |
6 | # STEP Reader - no error report if referenced entity has wrong type |
7 | ###################################################################### |
8 | |
9 | |
10 | stepread [locate_data_file bug25176_occ25176.stp] step * |
11 | |
12 | decho off |
13 | set Log [data c] |
14 | decho on |
15 | |
16 | if {![regexp {F:APPLICATION_PROTOCOL_DEFINITION: Parameter n0.4} $Log]} { |
17 | puts "Error: wrong report on wrong type entity" |
18 | } else { |
19 | puts "OK: correct report on wrong type entity" |
20 | } |