http://code.google.com/p/decnum-dynpmcs/source/detail?r=153
Modified:
/trunk/src/pmc/decnum.pmc
=======================================
--- /trunk/src/pmc/decnum.pmc Sat Aug 8 20:39:49 2009
+++ /trunk/src/pmc/decnum.pmc Sat Aug 8 20:41:13 2009
@@ -851,10 +851,10 @@
decContext *ctxt = get_context(PARROT_DECNUM(SELF)->context);
if (value->vtable->base_type == SELF->vtable->base_type){
- decNumberDivideInteger(PARROT_DECNUM(SELF)->number,
- PARROT_DECNUM(SELF)->number,
- PARROT_DECNUM(value)->number,
- ctxt);
+ decNumberRemainder(PARROT_DECNUM(SELF)->number,
+ PARROT_DECNUM(SELF)->number,
+ PARROT_DECNUM(value)->number,
+ ctxt);
check_flags_and_throw(INTERP, ctxt,
get_exceptions(PARROT_DECNUM(SELF)->context));
return;
}