summaryrefslogtreecommitdiff
path: root/ext/bigdecimal
diff options
context:
space:
mode:
Diffstat (limited to 'ext/bigdecimal')
-rw-r--r--ext/bigdecimal/bigdecimal.c17
1 files changed, 12 insertions, 5 deletions
diff --git a/ext/bigdecimal/bigdecimal.c b/ext/bigdecimal/bigdecimal.c
index 2191007d7a..c93ad91e8c 100644
--- a/ext/bigdecimal/bigdecimal.c
+++ b/ext/bigdecimal/bigdecimal.c
@@ -1426,18 +1426,25 @@ BigDecimal_DoDivmod(VALUE self, VALUE r, Real **div, Real **mod)
Real *a, *b;
size_t mx;
- GUARD_OBJ(a, GetVpValue(self, 1));
+ TypedData_Get_Struct(self, Real, &BigDecimal_data_type, a);
+ SAVE(a);
+
+ VALUE rr = Qnil;
if (RB_TYPE_P(r, T_FLOAT)) {
- b = GetVpValueWithPrec(r, 0, 1);
+ rr = rb_float_convert_to_BigDecimal(r, 0, true);
}
else if (RB_TYPE_P(r, T_RATIONAL)) {
- b = GetVpValueWithPrec(r, a->Prec*VpBaseFig(), 1);
+ rr = rb_rational_convert_to_BigDecimal(r, a->Prec*BASE_FIG, true);
}
else {
- b = GetVpValue(r, 0);
+ rr = rb_convert_to_BigDecimal(r, 0, false);
}
- if (!b) return Qfalse;
+ if (!is_kind_of_BigDecimal(rr)) {
+ return Qfalse;
+ }
+
+ TypedData_Get_Struct(rr, Real, &BigDecimal_data_type, b);
SAVE(b);
if (VpIsNaN(a) || VpIsNaN(b)) goto NaN;