Cross Reference: /gem5/tests/diff-out

222     $refvalue = $$refhash{$stat};
233 	push @key_stats, [$stat, $refvalue, $newvalue];
236     if ($ignore{$stat} or $refvalue eq $newvalue) {
240 	if ($refvalue eq $divbyzero || $newvalue eq $divbyzero) {
243 	    print "$stat: $refvalue --> $newvalue\n";
246 	    $reldiff = pct_diff($refvalue, $newvalue);
251 		[$stat, $refvalue, $newvalue, $reldiff];
277     ($statname, $refvalue, $newvalue, $reldiff) = @$key_stat;
280     $pointpos = rindex($refvalue, '.');
281     $digits = ($pointpos < 0) ? 0 :(length($refvalue) - $pointpos - 1);
286 	   $statname, $refvalue, $newvalue,
287 	   $newvalue - $refvalue, pct_diff($refvalue, $newvalue));
304     ($statname, $refvalue, $newvalue, $reldiff) = @$err;
307     $pointpos1 = rindex($refvalue, '.');
308     $digits1 = ($pointpos1 < 0) ? 0 :(length($refvalue) - $pointpos1 - 1);
316 	   $statname, $refvalue, $newvalue, $newvalue - $refvalue, $reldiff);