fix -h without size core dumping
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@544 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
d065440d5a
commit
77d112fa10
@ -196,7 +196,8 @@ exit_yap (int value)
|
||||
#if defined(YAPOR)
|
||||
unmap_memory();
|
||||
#endif /* YAPOR || TABLING */
|
||||
ShutdownLoadForeign();
|
||||
if (PrologMode != BootMode)
|
||||
ShutdownLoadForeign();
|
||||
exit(value);
|
||||
}
|
||||
|
||||
|
@ -310,7 +310,7 @@ parse_yap_arguments(int argc, char *argv[], yap_init_args *init_args)
|
||||
--argc, p = *++argv;
|
||||
else
|
||||
{
|
||||
fprintf(stderr,"[ YAP unrecoverable error: missing size in flag %s ]", argv[-1]);
|
||||
fprintf(stderr,"[ YAP unrecoverable error: missing size in flag %s ]", argv[0]);
|
||||
YapExit(1);
|
||||
}
|
||||
}
|
||||
|
Reference in New Issue
Block a user