Browse Source

* fixes to the type conversions in thlcgwasm.resize_stack_int_val

git-svn-id: branches/wasm@48266 -
nickysn 4 years ago
parent
commit
a6410fae90
1 changed files with 8 additions and 2 deletions
  1. 8 2
      compiler/wasm32/hlcgcpu.pas

+ 8 - 2
compiler/wasm32/hlcgcpu.pas

@@ -1887,14 +1887,20 @@ implementation
                 list.concat(taicpu.op_none(a_i64_extend_u_i32));
               end;
             OS_S8:
-              list.concat(taicpu.op_none(a_i64_extend_s_8));
+              begin
+                list.concat(taicpu.op_none(a_i64_extend_u_i32));
+                list.concat(taicpu.op_none(a_i64_extend_s_8));
+              end;
             OS_16:
               begin
                 a_op_const_stack(list,OP_AND,s32inttype,65535);
                 list.concat(taicpu.op_none(a_i64_extend_u_i32));
               end;
             OS_S16:
-              list.concat(taicpu.op_none(a_i64_extend_s_16));
+              begin
+                list.concat(taicpu.op_none(a_i64_extend_u_i32));
+                list.concat(taicpu.op_none(a_i64_extend_s_16));
+              end;
             OS_32:
               list.concat(taicpu.op_none(a_i64_extend_u_i32));
             OS_S32: