diff options
Diffstat (limited to 'repl.pl')
-rw-r--r-- | repl.pl | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -52,8 +52,10 @@ write_result([], State) :- write('true'), write_state(State). write_result([B|Bs], State) :- write_bindings([B|Bs]), write_state(State). write_bindings([]). -write_bindings([B|Bs]) :- - write(B), +write_bindings([Var = Val|Bs]) :- + write(Var), + write(' = '), + writeq(Val), ( Bs = [] -> true ; put_char(','), nl |