diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix small bugs

Browse Source
This commit is contained in:
ubu32 2011-02-28 15:45:14 -08:00
parent 3f6b92de4b
commit 851b07c240
4 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Makefile.in
View File

@ -315,7 +315,7 @@ PL_SOURCES= \
$(srcdir)/pl/tabling.yap $(srcdir)/pl/threads.yap \ $(srcdir)/pl/tabling.yap $(srcdir)/pl/threads.yap \
$(srcdir)/pl/udi.yap \ $(srcdir)/pl/udi.yap \
$(srcdir)/pl/utils.yap \ $(srcdir)/pl/utils.yap \
$(srcdir)/LGPL/history.pl \ $(srcdir)/pl/history.pl \
$(srcdir)/pl/yapor.yap $(srcdir)/pl/yio.yap $(srcdir)/pl/yapor.yap $(srcdir)/pl/yio.yap
YAPDOCS=$(srcdir)/docs/yap.tex $(srcdir)/docs/chr.tex \ YAPDOCS=$(srcdir)/docs/yap.tex $(srcdir)/docs/chr.tex \

1
pl/boot.yap
View File

@ -1079,6 +1079,7 @@ break :-
nb_setval('$if_level',0), nb_setval('$if_level',0),
get_value('$lf_verbose',OldSilent), get_value('$lf_verbose',OldSilent),
set_value('$lf_verbose',silent), set_value('$lf_verbose',silent),
set_stream(user_input,alias('$loop_stream')),
bootstrap(F), bootstrap(F),
set_value('$lf_verbose', OldSilent). set_value('$lf_verbose', OldSilent).

0
LGPL/history.pl → pl/history.pl
View File

4
pl/init.yap
View File

@ -113,7 +113,7 @@ system_mode(verbose,off) :- set_value('$verbose',off).
:- use_module('attributes.yap'). :- use_module('attributes.yap').
:- use_module('corout.yap'). :- use_module('corout.yap').
:- use_module('dialect.yap'). :- use_module('dialect.yap').
:- use_module('../LGPL/history.pl'). :- use_module('history.pl').
'$system_module'('$messages'). '$system_module'('$messages').
'$system_module'('$hacks'). '$system_module'('$hacks').
@ -209,5 +209,5 @@ file_search_path(foreign, yap('lib/Yap')).
:- yap_flag(unknown,error). :- yap_flag(unknown,error).
:- set_prolog_flag(readline, true). :- stream_property(user_input, tty(true)) -> set_prolog_flag(readline, true) ; true.