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

boot flags update.

Browse Source
This commit is contained in:
Vitor Santos Costa 2016-06-17 16:25:43 +01:00
parent 730259d47e
commit a1ec5e6198
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
C/qlyr.c
View File

@ -1062,7 +1062,7 @@ static Int qload_program(USES_REGS1) {
return true;
}
int Yap_Restore(const char *s, const char *lib_dir) {
YAP_file_type_t Yap_Restore(const char *s, const char *lib_dir) {
CACHE_REGS
FILE *stream = Yap_OpenRestore(s, lib_dir);
@ -1070,13 +1070,13 @@ int Yap_Restore(const char *s, const char *lib_dir) {
return -1;
GLOBAL_RestoreFile = s;
if (do_header(stream) == NIL)
return FALSE;
return YAP_BOOT_PL;
read_module(stream);
setBooleanGlobalPrologFlag(SAVED_PROGRAM_FLAG, true);
fclose(stream);
GLOBAL_RestoreFile = NULL;
LOCAL_SourceModule = CurrentModule = USER_MODULE;
return DO_ONLY_CODE;
return YAP_QLY;
}
void Yap_InitQLYR(void) {