diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

4
C/write.c
View File

@@ -537,9 +537,9 @@ writeTerm(Term t, int p, int depth, int rinfixarg, struct write_globs *wglb)
{
MP_INT *big = Yap_BigIntOfTerm(t);
char *s = (char *)TR;
if (s+2+mpz_sizeinbase(big, 10) >= Yap_TrailTop) {
if (s+3+mpz_sizeinbase(big, 10) >= Yap_TrailTop) {
s = (char *)H;
if (s+2+mpz_sizeinbase(big, 10) >= (char *)ASP) {
if (s+3+mpz_sizeinbase(big, 10) >= (char *)ASP) {
return;
}
}