main.c, emphasize the SETJMP wrapper in ngnutmeg

This commit is contained in:
rlar 2011-07-02 20:20:00 +00:00
parent 9887a2fb2b
commit d0012a124a
1 changed files with 14 additions and 12 deletions

View File

@ -1306,22 +1306,24 @@ evl:
#else /* ~ SIMULATOR */
if (SETJMP(jbuf, 1))
goto evl;
if (SETJMP(jbuf, 1)) {
cp_interactive = FALSE;
err = 0;
fprintf(cp_err, "Warning: error executing during ft_loadfile().\n");
if (ft_nutmeg && gdata) {
if (optind < argc)
while (optind < argc)
ft_loadfile(argv[optind++]);
else
ft_loadfile(ft_rawfile);
} else {
cp_interactive = FALSE;
err = 0;
if (ft_nutmeg && gdata) {
if (optind < argc)
while (optind < argc)
ft_loadfile(argv[optind++]);
else
ft_loadfile(ft_rawfile);
}
}
evl:
#endif /* ~ SIMULATOR */
for(;;)