round(p1 = v1, p2 = v2)
public
Round to the nearest 1 (by default), returning the result as a BigDecimal.
BigDecimal(‘3.14159’).round -> 3
BigDecimal(‘8.7’).round -> 9
If n is specified and positive, the fractional part of the result has no
more than that many digits.
If n is specified and negative, at least that many digits to the left of
the decimal point will be 0 in the result.
BigDecimal(‘3.14159’).round(3) -> 3.142
BigDecimal(‘13345.234’).round(-2) -> 13300.0
The value of the optional mode
argument can be used to determine how rounding is performed; see
BigDecimal.mode.
static VALUE
BigDecimal_round(int argc, VALUE *argv, VALUE self)
{
ENTER(5);
Real *c, *a;
int iLoc = 0;
U_LONG mx;
VALUE vLoc;
VALUE vRound;
U_LONG pl;
int sw = (int)VpGetRoundMode();
int na = rb_scan_args(argc,argv,"02",&vLoc,&vRound);
switch(na) {
case 0:
iLoc = 0;
break;
case 1:
Check_Type(vLoc, T_FIXNUM);
iLoc = FIX2INT(vLoc);
break;
case 2:
Check_Type(vLoc, T_FIXNUM);
iLoc = FIX2INT(vLoc);
Check_Type(vRound, T_FIXNUM);
sw = FIX2INT(vRound);
if(!VpIsRoundMode(sw)) {
rb_raise(rb_eTypeError, "invalid rounding mode");
return Qnil;
}
break;
}
pl = VpSetPrecLimit(0);
GUARD_OBJ(a,GetVpValue(self,1));
mx = a->Prec *(VpBaseFig() + 1);
GUARD_OBJ(c,VpCreateRbObject(mx, "0"));
VpSetPrecLimit(pl);
VpActiveRound(c,a,sw,iLoc);
if (argc == 0) {
return BigDecimal_to_i(ToValue(c));
}
return ToValue(c);
}