]> Repositorios git - scryer-prolog.git/commitdiff
FIXED: module qualification for between/3 in goal expansion (#941)
authorMarkus Triska <[email protected]>
Sun, 9 May 2021 21:54:37 +0000 (23:54 +0200)
committerMarkus Triska <[email protected]>
Sun, 9 May 2021 21:54:37 +0000 (23:54 +0200)
Many thanks to @dcnorris for reporting this issue!

src/lib/clpz.pl

index 2067446990138024af09f3c7bf1404995e672754..8ee53c0d90eaa511917b817989351c33b1268aee 100644 (file)
@@ -2968,7 +2968,7 @@ clpz_expansion(Var in Dom, In) :-
         (   ground(Dom), Dom = L..U, integer(L), integer(U) ->
             expansion_simpler(
                 (   integer(Var) ->
-                    between(L, U, Var)
+                    between:between(L, U, Var)
                 ;   clpz:clpz_in(Var, Dom)
                 ), In)
         ;   In = clpz:clpz_in(Var, Dom)
@@ -3045,7 +3045,9 @@ expansion_simpler(Var =:= Expr0, Goal) :-
         (   maplist(call, Gs) -> Value is Expr, Goal = (Var =:= Value)
         ;   Goal = false
         ).
-expansion_simpler(between(L,U,V), Goal) :- maplist(integer, [L,U,V]), !,
+expansion_simpler(between:between(L,U,V), Goal) :-
+        maplist(integer, [L,U,V]),
+        !,
         (   between(L,U,V) -> Goal = true
         ;   Goal = false
         ).