Fix: did not always produce error message

This commit is contained in:
ceriel 1998-11-10 14:26:06 +00:00
parent 384c4bc698
commit f0a7a313fc

View file

@ -218,6 +218,20 @@ LLsafeerror(t)
nc_done = 1;
LLsymb = EOFILE;
}
/* A little kludge here; when using non-correcting recovery
* it can happen that a program is correct but incomplete.
* Here, we test this, and make sure the appropriate
* message is generated
*/
if (! nc_done) {
int oldLLsymb;
oldLLsymb = LLsymb;
LLsymb = EOFILE;
LLmessage(0);
nc_done = 1;
/* Not really, but to prevent more than 1 error message */
LLsymb = oldLLsymb;
}
#endif
LLmessage(t);
}