do not check for non-unifiability in dif:attribute_goals, which is sure to succeed...

diff --git a/src/lib/dif.pl b/src/lib/dif.pl
index 9c3b8ed837272f270b603d726a63d029b7228374..d9c475eb5dae820d2a38ffedfa2e818cd77c3f6b 100644 (file)
--- a/src/lib/dif.pl
+++ b/src/lib/dif.pl
@@ -41,7 +41,8 @@ verify_attributes(Var, Value, Goals) :-
 dif(X, Y) :-
     X \== Y,
     (   X \= Y -> true
-    ;   (   term_variables(X, XVars), term_variables(Y, YVars),
+    ;   (   term_variables(X, XVars),
+            term_variables(Y, YVars),
             dif_set_variables(XVars, X, Y),
             dif_set_variables(YVars, X, Y)
         )
@@ -49,9 +50,7 @@ dif(X, Y) :-
 
 gather_dif_goals([]) --> [].
 gather_dif_goals([(X \== Y) | Goals]) -->
-    (   { X \= Y } -> []
-    ;   [dif:dif(X, Y)]
-    ),
+    [dif:dif(X, Y)],
     gather_dif_goals(Goals).
 
 attribute_goals(X) -->