Better error message displayed when file cannot be opened

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7416 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2005-09-08 22:31:21 +00:00
commit bed81d66d3
22 changed files with 89 additions and 56 deletions

View file

@ -207,7 +207,7 @@ CHICKEN::top(Node *n)
f_runtime = NewFile(outfile,"w");
if (!f_runtime) {
Printf(stderr,"*** Can't open '%s'\n", outfile);
FileErrorDisplay(outfile);
SWIG_exit(EXIT_FAILURE);
}
f_init = NewString("");
@ -268,7 +268,7 @@ CHICKEN::top(Node *n)
Printf(chicken_filename,"%s%s.scm", SWIG_output_directory(), module);
if ((f_scm = NewFile(chicken_filename,"w")) == 0) {
Printf(stderr,"Unable to open %s\n", chicken_filename);
FileErrorDisplay(chicken_filename);
SWIG_exit(EXIT_FAILURE);
}