diff --git a/compiler/wasm32/cpubase.pas b/compiler/wasm32/cpubase.pas
index ed5448be86..e8ae863bc1 100644
--- a/compiler/wasm32/cpubase.pas
+++ b/compiler/wasm32/cpubase.pas
@@ -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 }
diff --git a/compiler/wasm32/itcpuwasm.pas b/compiler/wasm32/itcpuwasm.pas
index 32d0ef1780..7bdfffddbd 100644
--- a/compiler/wasm32/itcpuwasm.pas
+++ b/compiler/wasm32/itcpuwasm.pas
@@ -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',