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:
@@ -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;
|
||||
}
|
||||
|
Reference in New Issue
Block a user