fix top-level message

This commit is contained in:
Vitor Santos Costa 2011-01-20 11:49:37 -06:00
parent 5c54ff89a1
commit 75703ed89a

View File

@ -536,7 +536,8 @@ true :- true.
% end of YAPOR
'$query'(G,[]) :-
'$prompt_alternatives_on'(groundness), !,
'$prompt_alternatives_on'(OPT),
( OPT = groundness ; OPT = determinism), !,
'$yes_no'(G,(?-)).
'$query'(G,V) :-
(