1berry/pawn-compiler
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix freeze when include file is a directory

Browse Source 
Fixes #41.
This commit is contained in:
Zeex 2015-02-22 22:49:12 +06:00
parent 8bb8671f1e
commit cebb44800e
1 changed files with 6 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
source/compiler/sc2.c
View File

@ -124,22 +124,19 @@ SC_FUNC void clearstk(void)
SC_FUNC int plungequalifiedfile(char *name) SC_FUNC int plungequalifiedfile(char *name)
{ {
static char *extensions[] = { ".inc", ".p", ".pawn" }; static char *extensions[] = { ".inc", ".p", ".pawn", "" };
FILE *fp; FILE *fp;
char *ext; char *ext;
int ext_idx; int ext_idx;
ext_idx=0; ext_idx=0;
do { do {
fp=(FILE*)pc_opensrc(name);
ext=strchr(name,'\0'); /* save position */ ext=strchr(name,'\0'); /* save position */
if (fp==NULL) { /* try to append an extension */
/* try to append an extension */ strcpy(ext,extensions[ext_idx]);
strcpy(ext,extensions[ext_idx]); fp=pc_opensrc(name);
fp=(FILE*)pc_opensrc(name); if (fp==NULL)
if (fp==NULL) *ext='\0'; /* on failure, restore filename */
*ext='\0'; /* on failure, restore filename */
} /* if */
ext_idx++; ext_idx++;
} while (fp==NULL && ext_idx<(sizeof extensions / sizeof extensions[0])); } while (fp==NULL && ext_idx<(sizeof extensions / sizeof extensions[0]));
if (fp==NULL) { if (fp==NULL) {
@ -3020,4 +3017,3 @@ static char itohstr[30];
*ptr='\0'; /* and a zero-terminator */ *ptr='\0'; /* and a zero-terminator */
return itohstr; return itohstr;
} }