fix bug in unify_bigint (obs from Jos de Roo).
This commit is contained in:
parent
a4344f5bf6
commit
45fac6d7b5
@ -6283,7 +6283,7 @@ Yap_absmi(int inp)
|
|||||||
derefa_body(d0, pt0, ubigint_unk, ubigint_nonvar);
|
derefa_body(d0, pt0, ubigint_unk, ubigint_nonvar);
|
||||||
BEGD(d1);
|
BEGD(d1);
|
||||||
d1 = PREG->u.oc.c;
|
d1 = PREG->u.oc.c;
|
||||||
PREG = NEXTOP(PREG, oi);
|
PREG = NEXTOP(PREG, oc);
|
||||||
BIND_GLOBAL(pt0, d1, bind_ubigint);
|
BIND_GLOBAL(pt0, d1, bind_ubigint);
|
||||||
#ifdef COROUTINING
|
#ifdef COROUTINING
|
||||||
DO_TRAIL(pt0, d1);
|
DO_TRAIL(pt0, d1);
|
||||||
|
Reference in New Issue
Block a user