UNLOZE/sourcemod
10
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fixed a codegen bug in the compiler (amb53)

Browse Source 
--HG--
extra : convert_revision : svn%3A39bc706e-5318-0410-9160-8a85361fbb7c/trunk%40556
This commit is contained in:
David Anderson 2007-03-01 04:41:41 +00:00
parent 124f9ba049
commit 27f239b639
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
sourcepawn/compiler/sc3.c
View File

@ -1266,7 +1266,7 @@ static int hier14(value *lval1)
* (a() ? return_array() : return_array()) ? return_array() : return_array() * (a() ? return_array() : return_array()) ? return_array() : return_array()
*/ */
void dynarray_from_heaplist(memuse_list_t *heap) long dynarray_from_heaplist(memuse_list_t *heap)
{ {
memuse_t *use=heap->head; memuse_t *use=heap->head;
memuse_t *tmp; memuse_t *tmp;
@ -1281,6 +1281,7 @@ void dynarray_from_heaplist(memuse_list_t *heap)
free(heap); free(heap);
if (total) if (total)
setheap_save(-total*sizeof(cell)); setheap_save(-total*sizeof(cell));
return total;
} }
static int hier13(value *lval) static int hier13(value *lval)
@ -1291,6 +1292,7 @@ static int hier13(value *lval)
int flab2=getlabel(); int flab2=getlabel();
value lval2={0}; value lval2={0};
int array1,array2; int array1,array2;
long total1,total2;
memuse_list_t *heap; memuse_list_t *heap;
pushheaplist(); pushheaplist();
@ -1309,7 +1311,7 @@ static int hier13(value *lval)
ldconst(lval->constval,sPRI); ldconst(lval->constval,sPRI);
sc_allowtags=(short)POPSTK_I(); /* restore */ sc_allowtags=(short)POPSTK_I(); /* restore */
heap=popsaveheaplist(); heap=popsaveheaplist();
dynarray_from_heaplist(heap); total1=dynarray_from_heaplist(heap);
pushheaplist(); pushheaplist();
jumplabel(flab2); jumplabel(flab2);
setlabel(flab1); setlabel(flab1);
@ -1331,9 +1333,9 @@ static int hier13(value *lval)
if (!matchtag(lval->tag,lval2.tag,FALSE)) if (!matchtag(lval->tag,lval2.tag,FALSE))
error(213); /* tagname mismatch ('true' and 'false' expressions) */ error(213); /* tagname mismatch ('true' and 'false' expressions) */
heap=popsaveheaplist(); heap=popsaveheaplist();
dynarray_from_heaplist(heap); total2=dynarray_from_heaplist(heap);
setlabel(flab2); setlabel(flab2);
if (array1 && array2) { if ((array1 && array2) && (total1 && total2)) {
markheap(MEMUSE_DYNAMIC, 0); markheap(MEMUSE_DYNAMIC, 0);
} }
if (lval->ident==iARRAY) if (lval->ident==iARRAY)