improved support for threads and code area allocation using malloc

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@965 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2004-02-05 16:57:02 +00:00
parent cacc407677
commit 9b84cdfe5d
43 changed files with 984 additions and 306 deletions
--- a/C/write.c
+++ b/C/write.c
@@ -468,7 +468,7 @@ writeTerm(Term t, int p, int depth, int rinfixarg, struct write_globs *wglb)
 	{
 	  char *s = (char *)TR;
 	  while (s+2+mpz_sizeinbase(Yap_BigIntOfTerm(t), 10) > (char *)Yap_TrailTop)
-	    Yap_growtrail(64*1024);
+	    Yap_growtrail(2+mpz_sizeinbase(Yap_BigIntOfTerm(t), 10));
 	  mpz_get_str(s, 10, Yap_BigIntOfTerm(t));
 	  wrputs(s,wglb->writech);
 	}