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

Fix jump addresses in casetbl disassembly

Browse Source
This commit is contained in:
Zeex 2014-08-31 04:52:36 +07:00
parent 5ea9b1fef3
commit e0a61e5f93
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
source/compiler/pawndisasm.c
View File

@ -322,9 +322,9 @@ cell casetbl(FILE *ftxt,const cell *params,cell opcode,cell cip)
print_opcode(ftxt,opcode,cip); print_opcode(ftxt,opcode,cip);
num=params[0]+1; num=params[0]+1;
fprintf(ftxt,"%08lx %08lx\n",params[0],params[1]+cip+sizeof(cell)); fprintf(ftxt,"%08lx %08lx\n",params[0],params[1]);
for (idx=1; idx<num; idx++) for (idx=1; idx<num; idx++)
fprintf(ftxt," %08lx %08lx\n",params[2*idx],params[2*idx+1]+cip+(2*idx+1)*sizeof(cell)); fprintf(ftxt," %08lx %08lx\n",params[2*idx],params[2*idx+1]);
return 2*num+1; return 2*num+1;
} }