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

windows fixes

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1103 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2004-07-23 21:08:45 +00:00
parent 3868089946
commit 3801508cdf
6 changed files with 48 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
C/unify.c
View File

@@ -26,7 +26,7 @@ STATIC_PROTO(int rtable_hash_op, (OPCODE));
STATIC_PROTO(void InitReverseLookupOpcode, (void));
#endif
int
static int
rational_tree_loop(CELL *pt0, CELL *pt0_end, CELL **to_visit0)
{
CELL **to_visit = to_visit0;
@@ -115,7 +115,7 @@ rational_tree(Term d0) {
Functor f = (Functor)(*pt0);
CELL **to_visit = (CELL **)H;
return(rational_tree_loop(pt0, pt0+ArityOfFunctor(f), to_visit));
return rational_tree_loop(pt0, pt0+ArityOfFunctor(f), to_visit);
} else
return(FALSE);
}