fix register recovery after ^c on Macs

fix 64 bit complaints.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1542 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2006-02-13 16:58:55 +00:00
parent bc82175e5e
commit 46f90fc6aa
5 changed files with 26 additions and 14 deletions

View File

@@ -86,7 +86,7 @@ static int p_open_trie(void) {
/* open trie */
node = open_trie();
if (!YAP_Unify(arg_trie, YAP_MkIntTerm((int) node)))
if (!YAP_Unify(arg_trie, YAP_MkIntTerm((YAP_Int) node)))
return FALSE;
return TRUE;
}
@@ -136,7 +136,7 @@ static int p_put_trie_entry(void) {
/* put trie entry */
node = put_trie_entry((TrNode) YAP_IntOfTerm(arg_trie), arg_entry, mode);
if (!YAP_Unify(arg_ref, YAP_MkIntTerm((int) node)))
if (!YAP_Unify(arg_ref, YAP_MkIntTerm((YAP_Int) node)))
return FALSE;
return TRUE;
}