This commit is contained in:
Mark Thom
2020-04-30 18:20:51 -06:00

View File

@@ -3064,7 +3064,7 @@ is_false(var(X)) :- nonvar(X).
:- dynamic(goal_expansion/1). :- dynamic(goal_expansion/1).
goal_expansion(Goal0, _Layout1, _Module, Goal, []) :- user:goal_expansion(Goal0, Goal) :-
\+ goal_expansion(false), \+ goal_expansion(false),
clpz_expandable(Goal0), clpz_expandable(Goal0),
clpz_expansion(Goal0, Goal). clpz_expansion(Goal0, Goal).