static int init_standard_system(int argc, char *argv[], YAP_init_args *iap) { int BootMode; BootMode = YAP_parse_yap_arguments(argc,argv,iap); /* init memory */ if (BootMode == YAP_BOOT_FROM_PROLOG || BootMode == YAP_FULL_BOOT_FROM_PROLOG) { int NewBootMode = YAP_Init(iap); if (NewBootMode != YAP_BOOT_FROM_PROLOG && BootMode != YAP_FULL_BOOT_FROM_PROLOG) BootMode = NewBootMode; } else { BootMode = YAP_Init(iap); } if (iap->ErrorNo) { /* boot failed */ YAP_Error(iap->ErrorNo,0L,iap->ErrorCause); } return BootMode; }
static int init_standard_system(int argc, char *argv[], YAP_init_args *iap) { YAP_file_type_t BootMode = YAP_parse_yap_arguments(argc, argv, iap); /* init memory */ iap->initial_file_type = BootMode = YAP_Init(iap); if (iap->ErrorNo) { /* boot failed */ YAP_Error(iap->ErrorNo, 0L, iap->ErrorCause); } return BootMode; }