fix unify_with_occurs_check/2 with floats and friends.

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

C/unify.c

@@ -146,6 +146,8 @@ rational_tree(Term d0) {
     CELL *pt0 = RepAppl(d0);
     Functor f = (Functor)(*pt0);
 
+    if (IsExtensionFunctor(f))
+      return FALSE;
     return rational_tree_loop(pt0, pt0+ArityOfFunctor(f), TO_VISIT);
   } else
     return FALSE;

changes-5.1.html

@@ -16,6 +16,8 @@
 
 <h2>Yap-5.1.2:</h2>
 <ul>
+<li> NEW: unify_with_occurs_check/2 was broken with extensions (obs from Aline Paes).</li> 
+<li> NEW: stack_dump/0 from Trevor.</li> 
 <li> NEW: with_mutex/2.</li> 
 <li> NEW: call_cleanup/2 and call_cleanup/3 at the request of Paulo
 Moura and Christian.</li>