Nulla o quasi

git-svn-id: svn://10.65.10.50/trunk@2324 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-12-20 10:17:26 +00:00
parent 9b59375403
commit 47c6923ddb

View File

@ -1,4 +1,4 @@
#include <ctype.h>
include <ctype.h>
#include <stdlib.h>
#include <real.h>
@ -1257,7 +1257,7 @@ char *real ::stringa (int len, int dec, char pad) const
// in modo che la loro somma dia sempre il real di partenza
// /////////////////////////////////////////////////////////
void TDistrib ::add(real slice)
void TDistribs::add(real slice)
{
if (slice > real (1.0))
slice /= 100.0;
@ -1268,7 +1268,7 @@ void TDistrib ::add(real slice)
real TDistrib::get ()
{
_ready = TRUE;
CHECK (_current < _slices.items (), "TDistrib: too many gets");
CHECK (_current < _slices.items(), "TDistrib: too many gets");
real r = _tot * ((real &) _slices[_current++]);
r.round (_decs);
if (r > _tot - _prog)