try to fix prompting.

This commit is contained in:
Vitor Santos Costa 2011-05-12 23:05:49 +01:00
parent 47f1499ae0
commit 0886c7d114

View File

@ -193,14 +193,13 @@ true :- true.
'$enter_top_level' :- '$enter_top_level' :-
'$disable_docreep', '$disable_docreep',
prompt(_,'| '), prompt(_,'| '),
prompt1(' ?- '),
'$run_toplevel_hooks', '$run_toplevel_hooks',
prompt1('|: '),
'$read_vars'(user_input,Command,_,Pos,Varnames, ' ?- '), '$read_vars'(user_input,Command,_,Pos,Varnames, ' ?- '),
nb_setval('$spy_gn',1), nb_setval('$spy_gn',1),
% stop at spy-points if debugging is on. % stop at spy-points if debugging is on.
nb_setval('$debug_run',off), nb_setval('$debug_run',off),
nb_setval('$debug_jump',off), nb_setval('$debug_jump',off),
prompt1('|: '),
'$command'(Command,Varnames,Pos,top), '$command'(Command,Varnames,Pos,top),
'$sync_mmapped_arrays', '$sync_mmapped_arrays',
set_value('$live','$false'). set_value('$live','$false').