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

Revert "Fix freeze when include file is a directory"

Browse Source 
This reverts commit cebb44800ee81f0a71dc594a3f542df892134c0a.
This commit is contained in:
Zeex 2015-02-22 23:08:32 +06:00
parent cebb44800e
commit 67a29b927e
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
source/compiler/sc2.c
View File

@ -124,19 +124,22 @@ 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 */
/* try to append an extension */ if (fp==NULL) {
strcpy(ext,extensions[ext_idx]); /* try to append an extension */
fp=pc_opensrc(name); strcpy(ext,extensions[ext_idx]);
if (fp==NULL) fp=(FILE*)pc_opensrc(name);
*ext='\0'; /* on failure, restore filename */ if (fp==NULL)
*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) {
@ -3017,3 +3020,4 @@ static char itohstr[30];
*ptr='\0'; /* and a zero-terminator */ *ptr='\0'; /* and a zero-terminator */
return itohstr; return itohstr;
} }