Prechádzať zdrojové kódy

* fixed bug with LOC_SUBSETREG/LOC_CSUBSETREG/LOC_SUBSETREF/LOC_CSUBSETREF in thlcgwasm.a_cmp_ref_loc_stack

Nikolay Nikolov 18 hodín pred
rodič
commit
cbb3225e6a
1 zmenil súbory, kde vykonal 2 pridanie a 2 odobranie
  1. 2 2
      compiler/wasm32/hlcgcpu.pas

+ 2 - 2
compiler/wasm32/hlcgcpu.pas

@@ -965,13 +965,13 @@ implementation
         LOC_SUBSETREG, LOC_CSUBSETREG:
         LOC_SUBSETREG, LOC_CSUBSETREG:
           begin
           begin
             tmpreg:=getintregister(list,size);
             tmpreg:=getintregister(list,size);
-            a_load_ref_reg(list,size,size,loc.reference,tmpreg);
+            a_load_ref_reg(list,size,size,ref,tmpreg);
             a_cmp_subsetreg_reg_stack(list,size,size,swap_opcmp(cmp_op),loc.sreg,tmpreg);
             a_cmp_subsetreg_reg_stack(list,size,size,swap_opcmp(cmp_op),loc.sreg,tmpreg);
           end;
           end;
         LOC_SUBSETREF, LOC_CSUBSETREF:
         LOC_SUBSETREF, LOC_CSUBSETREF:
           begin
           begin
             tmpreg:=getintregister(list,size);
             tmpreg:=getintregister(list,size);
-            a_load_ref_reg(list,size,size,loc.reference,tmpreg);
+            a_load_ref_reg(list,size,size,ref,tmpreg);
             a_cmp_subsetref_reg_stack(list,size,size,swap_opcmp(cmp_op),loc.sref,tmpreg);
             a_cmp_subsetref_reg_stack(list,size,size,swap_opcmp(cmp_op),loc.sref,tmpreg);
           end;
           end;
         else
         else