improve call/N implementation (#1829)

2023-06-10 01:25:47 -06:00
parent 3c344b176b
commit 98b0ab3409
8 changed files with 598 additions and 993 deletions
--- a/src/toplevel.pl
+++ b/src/toplevel.pl
@@ -181,7 +181,8 @@ submit_query_and_print_results_(Term, VarList) :-
    '$get_b_value'(B),
    bb_put('$report_all', false),
    bb_put('$report_n_more', 0),
-    atts:call_residue_vars(user:Term, AttrVars),
+    expand_goal(Term, user, Term0),
+    atts:call_residue_vars(user:Term0, AttrVars),
    write_eqs_and_read_input(B, VarList, AttrVars),
    !.
 submit_query_and_print_results_(_, _) :-