cpu_quota.run: don't get stuck on zero counters

The test previously complained about divide-by-zero if the counters were all
zero.

Fixes #1616
This commit is contained in:
Martin Stein 2015-07-03 16:26:04 +02:00 committed by Norman Feske
parent 413741e58c
commit 53e742fb02

View File

@ -145,11 +145,14 @@ set err_cnt 0
proc check_counter { name opt cnt total_cnt } {
global err_cnt
set err 0.01
set is [expr double($cnt) / $total_cnt ]
set is_pc [expr double(round($is * 100000)) / 1000]
set opt_pc [expr double(round($opt * 100000)) / 1000]
set err_str "Good: "
set err_str "Good: "
set err 0.01
set is 0
if {[expr $total_cnt != 0]} { set is [expr double($cnt) / $total_cnt ] }
set is_pc [expr double(round($is * 100000)) / 1000]
set opt_pc [expr double(round($opt * 100000)) / 1000]
if {[expr $is > $opt + $err || $is < $opt - $err]} {