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

correct call_residue_vars/3 using new copy_term_3 (#1239)

Browse Source
This commit is contained in:
Mark Thom
2023-03-12 14:14:29 -06:00
parent 3a522f3c98
commit 9b35a316c9
5 changed files with 42 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/lib/atts.pl
View File

@@ -115,7 +115,9 @@ user:goal_expansion(Term, M:get_atts(Var, Attr)) :-
call_residue_vars(Goal, Vars) :-
'$get_attr_var_queue_delim'(B),
call(Goal),
'$get_attr_var_queue_beyond'(B, 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).