add type to BIG NUMs, so that we can easily know what it is all about.

This commit is contained in:
Vítor Santos Costa
2008-11-28 15:54:46 +00:00
parent e8cbc5034e
commit 13dd600f88
14 changed files with 71 additions and 100 deletions

View File

@@ -676,7 +676,8 @@ YAP_MkBlobTerm(unsigned int sz)
}
I = AbsAppl(H);
H[0] = (CELL)FunctorBigInt;
dst = (MP_INT *)(H+1);
H[1] = BIG_INT;
dst = (MP_INT *)(H+2);
dst->_mp_size = 0L;
dst->_mp_alloc = sz;
H += (1+sizeof(MP_INT)/sizeof(CELL));