add meta_predicate declaration for with_local_attributes/3
This is needed for all_distinct/1 etc.
Example:
?- all_distinct([X,Y,Z]).
clpz:all_distinct([X,Y,Z])
; false.
This commit is contained in:
@@ -6047,6 +6047,8 @@ remove_attr(Var, Attr) :-
|
|||||||
functor(Term, Attr, 1),
|
functor(Term, Attr, 1),
|
||||||
put_atts(Var, -Term).
|
put_atts(Var, -Term).
|
||||||
|
|
||||||
|
:- meta_predicate with_local_attributes(?, 0, ?).
|
||||||
|
|
||||||
with_local_attributes(Vars, Goal, Result) :-
|
with_local_attributes(Vars, Goal, Result) :-
|
||||||
catch((Goal,
|
catch((Goal,
|
||||||
maplist(del_all_attrs, Vars),
|
maplist(del_all_attrs, Vars),
|
||||||
|
|||||||
Reference in New Issue
Block a user