mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-16 08:10:43 -08:00
Code Issues Projects Releases Wiki Activity

Removed unnecessary conditionalization

Browse source 
Copied from Perforce
 Change: 20620
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Pekka Pirinen 1999-03-15 13:03:16 +00:00
parent d037633e95
commit eb79f4afe2
1 changed files with 14 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

33
mps/src/meter.c
View file

@ -1,6 +1,6 @@
/* impl.c.meter: METERS
*
* $HopeName: MMsrc!meter.c(trunk.6) $
* $HopeName: MMsrc!meter.c(trunk.7) $
* Copyright (C) 1998, 1999 Harlequin Group plc. All rights reserved.
*
* TRANSGRESSIONS
@ -57,37 +57,32 @@ void MeterAccumulate(Meter meter, Size amount)
}
/* MeterWrite -- describe method for meters
*
* When meters aren't being used, this doesn't output anything, but it
* still has to be called so that it can return ResOK, and the callers
* don't have to know about STATISTIC.
*/
/* MeterWrite -- describe method for meters */
Res MeterWrite(Meter meter, mps_lib_FILE *stream)
{
Res res = ResOK;
STATISTIC(res = WriteF(stream,
"meter $S {", meter->name,
"count: $U", meter->count,
NULL));
res = WriteF(stream,
"meter $S {", meter->name,
"count: $U", meter->count,
NULL);
if (res != ResOK)
return res;
if (meter->count > 0) {
double mean = meter->total / (double)meter->count;
STATISTIC(res = WriteF(stream,
", total: $D", meter->total,
", max: $U", meter->max,
", min: $U", meter->min,
", mean: $D", mean,
", mean^2: $D", meter->meanSquared,
NULL));
res = WriteF(stream,
", total: $D", meter->total,
", max: $U", meter->max,
", min: $U", meter->min,
", mean: $D", mean,
", mean^2: $D", meter->meanSquared,
NULL);
if (res != ResOK)
return res;
}
STATISTIC(res = WriteF(stream, "}\n", NULL));
res = WriteF(stream, "}\n", NULL);
return res;
}