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

fix YAP_Init return test.

Browse Source
This commit is contained in:
Vítor Santos Costa 2010-06-06 23:05:54 +01:00
parent 05a20e26f3
commit 4ffdafb529
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
library/yap2swi/yap2swi.c
View File

@ -2234,11 +2234,16 @@ PL_initialise(int myargc, char **myargv)
memset((void *)&init_args,0,sizeof(init_args));
init_args.Argv = myargv;
init_args.Argc = myargc;
#if BOOT_FROM_SAVED_STATE
init_args.SavedState = "startup.yss";
#else
init_args.SavedState = NULL;
#endif
init_args.YapLibDir = NULL;
init_args.YapPrologBootFile = NULL;
init_args.HaltAfterConsult = FALSE;
init_args.FastBoot = FALSE;
init_args.MaxTableSpaceSize = 0;
init_args.NumberWorkers = 1;
init_args.SchedulerLoop = 10;
init_args.DelayedReleaseLoad = 3;
@ -2246,8 +2251,7 @@ PL_initialise(int myargc, char **myargv)
Yap_PL_Argc = myargc;
Yap_PL_Argv = myargv;
Yap_InitialisedFromPL = TRUE;
return YAP_Init(&init_args);
return YAP_Init(&init_args) != YAP_BOOT_ERROR;
}
X_API int