add user_flags/s prolog_flag

2010-02-28 00:42:47 +00:00
parent 495529e69e
commit ec30e08f69
4 changed files with 112 additions and 66 deletions
--- a/library/dialect/swi.yap
+++ b/library/dialect/swi.yap
@@ -13,6 +13,8 @@

 :- load_foreign_files([plstream], [], initIO).

+:- set_prolog_flag(user_flags,silent).
+
 :- ensure_loaded(library(atts)).

 :- use_module(library(charsio),[write_to_chars/2,read_from_chars/2]).