소스 검색

* 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;