rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Revert "use new call_residue_vars/2 in toplevel.pl (#847)"

Browse Source 
This reverts commit 04ba9bc11a.
This commit is contained in:
Mark Thom
2023-03-14 21:34:48 -06:00
parent 04ba9bc11a
commit cc8bb38abc
2 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/lib/atts.pl
View File

@@ -110,9 +110,6 @@ user:goal_expansion(Term, M:get_atts(Var, Attr)) :-
nonvar(Term),
Term = get_atts(Var, M, Attr).
term_attributed_variables(Term, Vars) :-
'$term_attributed_variables'(Term, Vars).
:- meta_predicate call_residue_vars(0, ?).
call_residue_vars(Goal, Vars) :-
@@ -121,3 +118,6 @@ call_residue_vars(Goal, Vars) :-
'$get_attr_var_queue_beyond'(B, AttrVars),
'$project_atts':copy_term(AttrVars, AttrVars, Gs),
'$term_attributed_variables_without_attrs'(Gs, Vars).
term_attributed_variables(Term, Vars) :-
'$term_attributed_variables'(Term, Vars).