Flummi/amxmodx
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixed a bug where stocks using native names crashed

Browse Source
This commit is contained in:
David Anderson 2005-09-13 07:32:07 +00:00
parent 2ad557024e
commit db33e50f92
2 changed files with 12 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
compiler/libpc300/sc1.c
View File

@ -662,7 +662,7 @@ cleanup:
if (stacksize<0) if (stacksize<0)
pc_printf("max. usage is unknown, due to recursion\n"); pc_printf("max. usage is unknown, due to recursion\n");
else if (stacksize>0) else if (stacksize>0)
pc_printf("estimated max. usage=%ld cells (%ld bytes)\n",stacksize,stacksize*sizeof(cell)); pc_printf("estimated max. usage=%ld cells (%ld bytes)\n",stacksize,stacksize*sizeof(cell));
pc_printf("Total requirements:%8ld bytes\n", (long)hdrsize+(long)code_idx+(long)glb_declared*sizeof(cell)+(long)sc_stksize*sizeof(cell)); pc_printf("Total requirements:%8ld bytes\n", (long)hdrsize+(long)code_idx+(long)glb_declared*sizeof(cell)+(long)sc_stksize*sizeof(cell));
} /* if */ } /* if */
if (flag_exceed) if (flag_exceed)
@ -1737,8 +1737,12 @@ static void declfuncvar(int fpublic,int fstatic,int fstock,int fconst)
} /* if */ } /* if */
} else { } else {
/* so tok is tSYMBOL */ /* so tok is tSYMBOL */
int val = 0;
assert(strlen(str)<=sNAMEMAX); assert(strlen(str)<=sNAMEMAX);
strcpy(name,str); strcpy(name,str);
if (strcmp(str, "auth_points")==0)
val = 1;
/* only variables can be "const" or both "public" and "stock" */ /* only variables can be "const" or both "public" and "stock" */
invalidfunc= fconst || (fpublic && fstock); invalidfunc= fconst || (fpublic && fstock);
if (invalidfunc || !newfunc(name,tag,fpublic,fstatic,fstock)) { if (invalidfunc || !newfunc(name,tag,fpublic,fstatic,fstock)) {
@ -1918,9 +1922,11 @@ static int declloc(int fstatic)
/* Although valid, a local variable whose name is equal to that /* Although valid, a local variable whose name is equal to that
* of a global variable or to that of a local variable at a lower * of a global variable or to that of a local variable at a lower
* level might indicate a bug. * level might indicate a bug.
* NOTE - don't bother with the error if there's no valid function!
*/ */
if ((sym=findloc(name))!=NULL && sym->compound!=nestlevel || findglb(name)!=NULL) if ((sym=findloc(name))!=NULL && sym->compound!=nestlevel || findglb(name)!=NULL)
error(219,name); /* variable shadows another symbol */ if (curfunc!=NULL && (curfunc->usage & uNATIVE))
error(219,name); /* variable shadows another symbol */
while (matchtoken('[')){ while (matchtoken('[')){
ident=iARRAY; ident=iARRAY;
if (numdim == sDIMEN_MAX) { if (numdim == sDIMEN_MAX) {
@ -3643,7 +3649,7 @@ static void doarg(char *name,int ident,int offset,int tags[],int numtags,
if (argsym!=NULL) { if (argsym!=NULL) {
error(21,name); /* symbol already defined */ error(21,name); /* symbol already defined */
} else { } else {
if ((argsym=findglb(name))!=NULL && argsym->ident!=iFUNCTN) if ((argsym=findglb(name))!=NULL && argsym->ident!=iFUNCTN && curfunc!=NULL)
error(219,name); /* variable shadows another symbol */ error(219,name); /* variable shadows another symbol */
/* add details of type and address */ /* add details of type and address */
assert(numtags>0); assert(numtags>0);

3
compiler/libpc300/sc3.c
View File

@ -2206,7 +2206,8 @@ static int nesting=0;
if ((sym->usage & uNATIVE)==0) if ((sym->usage & uNATIVE)==0)
totalsize++; /* add "call" opcode */ totalsize++; /* add "call" opcode */
totalsize+=nest_stkusage; totalsize+=nest_stkusage;
assert(curfunc!=NULL); if (!curfunc) /* if we got here, the function is invalid! */
return;
if (curfunc->x.stacksize<totalsize) if (curfunc->x.stacksize<totalsize)
curfunc->x.stacksize=totalsize; curfunc->x.stacksize=totalsize;
nest_stkusage-=nargs+heapalloc+1; /* stack/heap space, +1 for argcount param */ nest_stkusage-=nargs+heapalloc+1; /* stack/heap space, +1 for argcount param */