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

restore previous focus upon character match failure in compare_pstr_to_string (#441)

Browse Source
This commit is contained in:
Mark Thom
2020-05-03 17:03:59 -06:00
parent aafe18c2b5
commit 9e220e8416
2 changed files with 5 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/prolog/toplevel.pl
View File

@@ -323,21 +323,6 @@ gather_goals([Var = Value | Pairs], VarList, QueryVarList, Goals) :-
; gather_goals(Pairs, VarList, QueryVarList, Goals)
).
/*
gather_goals([], VarList, QueryVarList, Goals) :-
gather_query_vars(VarList, Vars),
copy_term(Vars, Vars, Goals).
% filter_goals(Goals0, Goals, Vars).
gather_goals([Var = Value | Pairs], VarList, QueryVarList, Goals) :-
( ( nonvar(Value)
; is_a_different_variable(Pairs, Value)
) ->
Goals = [Var = Value | Goals0],
gather_goals(Pairs, VarList, QueryVarList, Goals0)
; gather_goals(Pairs, VarList, QueryVarList, Goals)
).
*/
print_exception(E) :-
( E == error('$interrupt_thrown', repl) -> nl % print the
% exception on a