fix booting without global variables

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1742 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2006-12-27 12:27:15 +00:00
parent 7a82e1b59b
commit bb51b72a9d

View File

@ -837,6 +837,7 @@ break :-
nb_setval('$break',BL). nb_setval('$break',BL).
'$silent_bootstrap'(F) :- '$silent_bootstrap'(F) :-
'$allocate_default_arena'(1024, 64),
get_value('$lf_verbose',OldSilent), get_value('$lf_verbose',OldSilent),
set_value('$lf_verbose',silent), set_value('$lf_verbose',silent),
bootstrap(F), bootstrap(F),