paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-06 11:28:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

* changed op2strtype to have a large enough string to hold the instruction and

Browse Source 
use that type for wasm_op2str in itcpuwasm

git-svn-id: branches/wasm@46667 -
This commit is contained in:
nickysn 2020-08-23 16:37:20 +00:00
parent 5f33623bb6
commit bd72084939
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/wasm32/cpubase.pas
View File

@ -88,7 +88,7 @@ uses
TWasmBasicType = (wbt_i32, wbt_i64, wbt_f32, wbt_f64);
{# This should define the array of instructions as string }
op2strtable=array[tasmop] of string[8];
op2strtable=array[tasmop] of string[31];
Const
{# First value of opcode enumeration }

2
compiler/wasm32/itcpuwasm.pas
View File

@ -29,7 +29,7 @@ interface
cpubase,cgbase;
const
wasm_op2str : array[tasmop] of string[31] = ( '<none>',
wasm_op2str : op2strtable = ( '<none>',
// control flow
'block', 'loop', 'br', 'br_if', 'br_table', 'if', 'else', 'end',
'return', 'unreachable',