Commit | Line | Data |
---|---|---|
474be6cd | 1 | catch { vfit } |
2 | if { [ catch { vdump $imagedir/${test_image}.gif } catch_result ] } { | |
3 | puts $catch_result | |
4 | } | |
5 | ||
6 | set diff [diffimage $imagedir/${test_image}.gif [ locate_data_file ${group}_${subgroup}_${test_image}.gif ] 0. 0 0 ] | |
7 | ||
8 | if { $diff > 10 } { | |
9 | puts "Error : images are different" | |
10 | } | |
11 | ||
12 | puts "TEST COMPLETED" | |
13 | ||
14 |