Explorar o código

* optimization in thlcgwasm.resize_stack_int_val to avoid some redundant conversions

Nikolay Nikolov hai 13 horas
pai
achega
12bfa69736
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/wasm32/hlcgcpu.pas

+ 1 - 1
compiler/wasm32/hlcgcpu.pas

@@ -2831,7 +2831,7 @@ implementation
                   internalerror(2021010302);
               end;
             end
-          else if tcgsize2size[fromcgsize]>=tcgsize2size[tocgsize] then
+          else if (tcgsize2size[fromcgsize]>=tcgsize2size[tocgsize]) and (fromcgsize<>tocgsize) then
             begin
               { truncate }
               case tocgsize of