3bea4c16 |
1 | puts "============" |
2 | puts "OCC23385" |
3 | puts "============" |
4 | puts "" |
5 | #################################################################################### |
6 | # Bug in AIS_TexturedShape::Compute() |
7 | #################################################################################### |
8 | |
9 | set BugNumber OCC23385 |
10 | |
11 | vinit |
12 | restore [locate_data_file OCC23115-bottle.brep] b |
13 | explode b F |
14 | vdisplay b_16 |
15 | vtexture b_16 [locate_data_file OCC23385-carrelage1.gif] |
16 | vtexrepeat b_16 3 2 |
17 | vsetdispmode b_16 1 |
18 | vfit |
19 | |
ccadc126 |
20 | if { "[vreadpixel 85 73 rgb name]" != "BLACK" } { |
21 | puts "OK ${BugNumber}" |
3bea4c16 |
22 | } else { |
3bea4c16 |
23 | puts "Faulty ${BugNumber}" |
3bea4c16 |
24 | } |
25 | |
26 | set only_screen 1 |
27 | |
28 | |
29 | |
30 | |