Better error message displayed when file cannot be opened

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

View file

@ -93,6 +93,7 @@
#define DohNewFile DOH_NAMESPACE(NewFile)
#define DohNewFileFromFile DOH_NAMESPACE(NewFileFromFile)
#define DohNewFileFromFd DOH_NAMESPACE(NewFileFromFd)
#define DohFileErrorDisplay DOH_NAMESPACE(FileErrorDisplay)
#define DohClose DOH_NAMESPACE(Close)
#define DohCopyto DOH_NAMESPACE(Copyto)
#define DohNewList DOH_NAMESPACE(NewList)
@ -283,6 +284,7 @@ extern char *DohStrchr(const DOHString_or_char *s1, int ch);
extern DOHFile *DohNewFile(DOH *file, const char *mode);
extern DOHFile *DohNewFileFromFile(FILE *f);
extern DOHFile *DohNewFileFromFd(int fd);
extern void DohFileErrorDisplay(DOHString *filename);
extern int DohClose(DOH *file);
extern int DohCopyto(DOHFile *input, DOHFile *output);
@ -372,6 +374,7 @@ extern void DohMemoryDebug(void);
#define NewFile DohNewFile
#define NewFileFromFile DohNewFileFromFile
#define NewFileFromFd DohNewFileFromFd
#define FileErrorDisplay DohFileErrorDisplay
#define Close DohClose
#define NewVoid DohNewVoid
#define Keys DohKeys

View file

@ -17,6 +17,7 @@ char cvsroot_file_c[] = "$Header$";
#ifdef DOH_INTFILE
#include <unistd.h>
#endif
#include <errno.h>
typedef struct {
FILE *filep;
@ -291,3 +292,16 @@ DohNewFileFromFd(int fd)
f->closeondel = 0;
return DohObjMalloc(&DohFileType,f);
}
/* -----------------------------------------------------------------------------
* FileErrorDisplay()
*
* Display cause of one the NewFile functions failing.
* ----------------------------------------------------------------------------- */
void
DohFileErrorDisplay(DOHString *filename)
{
Printf(stderr, "Unable to open file %s: %s\n", filename, strerror(errno));
}