YPP would leave exceptions on the system, disabling Yap-4.5.7

message.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1364 b08c6af1-5177-4d33-ba66-4b1c6b8b522a

C/unify.c

@@ -116,7 +116,7 @@ loop:
     to_visit += 3;
     goto loop;
   }
-  return (FALSE);
+  return FALSE;
 
 cufail:
   /* we found an infinite term */
@@ -361,9 +361,7 @@ oc_unify_nvar:
 oc_unify_nvar_nvar:
 
   if (d0 == d1) {
-    if (rational_tree(d0))
-      return(FALSE);
-    return(TRUE);
+    return (!rational_tree(d0));
   }
   /* both arguments are bound */
   if (IsPairTerm(d0)) {