fix handling of attributed vars.
This commit is contained in:
parent
1461f44184
commit
cf7dccdcdf
@ -262,6 +262,9 @@ residuals_and_delete_attributes(Vs, Gs, Term) :-
|
||||
delete_attributes(Term).
|
||||
|
||||
attvars_residuals([]) --> [].
|
||||
attvars_residuals([V|Vs]) -->
|
||||
{ nonvar(V) }, !,
|
||||
attvars_residuals(Vs).
|
||||
attvars_residuals([V|Vs]) -->
|
||||
( { get_attrs(V, As) }
|
||||
-> attvar_residuals(As, V)
|
||||
|
Reference in New Issue
Block a user