readline handling
This commit is contained in:
parent
8d126b7de6
commit
fdc01b0c27
@ -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)).
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user