809eca9d |
1 | puts "================" |
2 | puts "OCC23065" |
3 | puts "================" |
4 | puts "" |
5 | ########################################################################################## |
6 | # This is desirable to add general DRAW command to estimate visualization performance |
7 | ########################################################################################## |
8 | |
9 | set BugNumber OCC23065 |
10 | |
11 | vinit |
12 | set Log [vfps] |
13 | |
14 | set status 0 |
15 | if { [llength ${Log}] == 5} { |
16 | set word1 [string compare [lindex ${Log} end] "msec"] |
17 | set word2 [string compare [lindex ${Log} end-2] "CPU:"] |
18 | set word3 [string compare [lindex ${Log} end-4] "FPS:"] |
19 | if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 } { |
20 | set status 0 |
21 | } else { |
22 | set status 1 |
23 | } |
24 | } else { |
25 | set status 1 |
26 | } |
27 | |
28 | # Resume |
29 | puts "" |
30 | if { ${status} == 0 } { |
31 | puts "OK ${BugNumber}" |
32 | } else { |
33 | puts "Faulty ${BugNumber}" |
34 | } |