readline handling

This commit is contained in:
Vitor Santos Costa 2016-06-17 17:09:57 +01:00
parent 8d126b7de6
commit fdc01b0c27

View File

@ -42,7 +42,7 @@
:- use_system_module( '$_boot', ['$cut_by'/1]). :- use_system_module( '$_boot', ['$cut_by'/1]).
% :- start_low_level_trace. %:- start_low_level_trace.
% This is the YAP init file % This is the YAP init file
% should be consulted first step after booting % should be consulted first step after booting
@ -110,8 +110,6 @@ otherwise.
:- '$all_current_modules'(M), yap_flag(M:unknown, error) ; true. :- '$all_current_modules'(M), yap_flag(M:unknown, error) ; true.
:- compile_expressions. :- compile_expressions.
:- bootstrap('bootlists.yap'). :- bootstrap('bootlists.yap').
@ -126,14 +124,11 @@ otherwise.
:- bootstrap('os.yap'). :- bootstrap('os.yap').
:- bootstrap('grammar.yap'). :- bootstrap('grammar.yap').
:- bootstrap('absf.yap'). :- bootstrap('absf.yap').
%:-set_prolog_flag(gc_trace, verbose). %:-set_prolog_flag(gc_trace, verbose).
%:- set_prolog_flag( verbose_file_search, true ). %:- set_prolog_flag( verbose_file_search, true ).
:- dynamic prolog:'$parent_module'/2. :- dynamic prolog:'$parent_module'/2.
:- [ :- [
'directives.yap', 'directives.yap',
'preds.yap', 'preds.yap',
@ -352,8 +347,6 @@ If this hook predicate succeeds it must instantiate the _Action_ argument to th
:- yap_flag(user:unknown,error). :- yap_flag(user:unknown,error).
:- stream_property(user_input, tty(true)) -> set_prolog_flag(readline, true) ; true.
/* /*
:- if(predicate_property(run_tests, static)). :- if(predicate_property(run_tests, static)).