bignum support fixes

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1531 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2006-02-01 13:28:57 +00:00
parent 5f56e91375
commit 9e697d5bee
13 changed files with 45 additions and 16 deletions
--- a/C/utilpreds.c
+++ b/C/utilpreds.c
@@ -1812,7 +1812,7 @@ static int subsumes_complex(register CELL *pt0, register CELL *pt0_end, register
    pt0_end = to_visit[1];
    pt1 = to_visit[2];
    *pt0 = (CELL)to_visit[3];
-    write_mode = (int)to_visit[4];
+    write_mode = (Int)to_visit[ 4];
    to_visit += 5;
 #else
    pt0 = to_visit[0];