1475
1475
int frac0=scale>0 ? ROUND_UP(scale) : scale/DIG_PER_DEC1,
1476
1476
frac1=ROUND_UP(from->frac), UNINIT_VAR(round_digit),
1477
intg0=ROUND_UP(from->intg), error=E_DEC_OK, len=to->len,
1480
1479
dec1 *buf0=from->buf, *buf1=to->buf, x, y, carry=0;