Преглед на файлове

* fixed WebAssembly code generation in thlcgwasm.g_overflowCheck_loc (patch by Pierre)

Nikolay Nikolov преди 3 години
родител
ревизия
6e4e3b8580
променени са 1 файла, в които са добавени 2 реда и са изтрити 0 реда
  1. 2 0
      compiler/wasm32/hlcgcpu.pas

+ 2 - 0
compiler/wasm32/hlcgcpu.pas

@@ -2164,8 +2164,10 @@ implementation
       if not(cs_check_overflow in current_settings.localswitches) then
         exit;
       current_asmdata.getjumplabel(hl);
+      list.concat(taicpu.op_none(a_block));
       a_cmp_const_loc_label(list,s32inttype,OC_EQ,0,ovloc,hl);
       g_call_system_proc(list,'fpc_overflow',[],nil);
+      list.concat(taicpu.op_none(a_end_block));
       a_label(list,hl);
     end;