352ffd73 |
1 | puts "==================================" |
2 | puts "BUC60569" |
3 | puts "OCC597" |
4 | puts "==================================" |
5 | puts "" |
6 | puts "==================================" |
7 | puts "It takes visual check for this BUG" |
8 | puts "==================================" |
9 | puts "" |
10 | |
11 | restore [locate_data_file buc60569a.rle] result |
12 | tclean result |
13 | vinit |
14 | |
15 | checkshape result |
16 | |
17 | BUC60569 result |
18 | vfit |
19 | |
4754e164 |
20 | vselect 250 190 |
21 | vselect 180 350 1 |
22 | vmoveto 250 190 |
23 | vmoveto 180 350 |
352ffd73 |
24 | |
25 | set x_coord 101 |
26 | set y_coord 347 |
27 | |
28 | checkcolor $x_coord $y_coord 0 1 1 |
29 | |
30 | if {$stat != 1} { |
31 | puts "Error : The left face is highlighted by Move To command" |
32 | } |
33 | |
5747059b |
34 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |
352ffd73 |
35 | |