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

call readline at the right time

Browse Source
This commit is contained in:
Vitor Santos Costa 2016-06-17 16:07:45 +01:00
parent 807cca51ec
commit 899e892aef
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
C/flags.c
View File

@ -25,6 +25,7 @@
#define INIT_FLAGS 1 #define INIT_FLAGS 1
#include "Yap.h" #include "Yap.h"
#include "iopreds.h"
#if HAVE_UNISTD_H #if HAVE_UNISTD_H
#include <unistd.h> #include <unistd.h>
#endif #endif
@ -1593,6 +1594,11 @@ void Yap_InitFlags(bool bootstrap) {
LOCAL_flagCount++; LOCAL_flagCount++;
f++; f++;
} }
// fix readline gettong set so early
if (GLOBAL_Stream[StdInStream].status & Readline_Stream_f) {
setBooleanGlobalPrologFlag(READLINE_FLAG, true);
}
if (!bootstrap) { if (!bootstrap) {
Yap_InitCPredBack("current_prolog_flag", 2, 1, current_prolog_flag, Yap_InitCPredBack("current_prolog_flag", 2, 1, current_prolog_flag,
cont_yap_flag, 0); cont_yap_flag, 0);