]> Repositorios git - scryer-prolog.git/commitdiff
order generation of variable names in attributed goals after toplevel variables ...
authorMark Thom <[email protected]>
Wed, 27 May 2020 17:11:26 +0000 (11:11 -0600)
committerMark Thom <[email protected]>
Wed, 27 May 2020 17:11:26 +0000 (11:11 -0600)
src/prolog/toplevel.pl

index 17561ecea9e164dec9afbde0e841461a27dcdbc9..f3d6bc123495b18a524472935997940fad1e40f8 100644 (file)
@@ -240,9 +240,7 @@ write_eqs_and_read_input(B, VarList) :-
     gather_query_vars(VarList, OrigVars),
     gather_equations(NewVarList, OrigVars, Equations),
     append(Equations, AttrGoals, Goals),
-    term_variables(Equations, EqVars0),
-    append([EqVars0, AttrVars, AttrGoalVars], Vars1),
-    charsio:extend_var_list(Vars1, VarList, NewVarList0, fabricated),
+    charsio:extend_var_list(AttrGoalVars, VarList, NewVarList0, fabricated),
     (   bb_get('$first_answer', true) ->
         write('   '),
         bb_put('$first_answer', false)