improve error handling for qload
This commit is contained in:
parent
7e3db0f75c
commit
8758b6de5a
11
C/errors.c
11
C/errors.c
@ -1441,6 +1441,17 @@ Yap_Error(yap_error_number type, Term where, char *format,...)
|
|||||||
serious = TRUE;
|
serious = TRUE;
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
case SAVED_STATE_ERROR:
|
||||||
|
{
|
||||||
|
int i;
|
||||||
|
|
||||||
|
i = strlen(tmpbuf);
|
||||||
|
nt[0] = MkAtomTerm(AtomSystemError);
|
||||||
|
psize -= i;
|
||||||
|
fun = FunctorError;
|
||||||
|
serious = TRUE;
|
||||||
|
}
|
||||||
|
break;
|
||||||
case SYSTEM_ERROR:
|
case SYSTEM_ERROR:
|
||||||
{
|
{
|
||||||
int i;
|
int i;
|
||||||
|
Reference in New Issue
Block a user