瀏覽代碼

* fixed internal error 2019083002 with e.g. inc(local)

git-svn-id: branches/wasm@47927 -
nickysn 4 年之前
父節點
當前提交
31bc357c1b
共有 1 個文件被更改,包括 1 次插入6 次删除
  1. 1 6
      compiler/wasm32/hlcgcpu.pas

+ 1 - 6
compiler/wasm32/hlcgcpu.pas

@@ -1055,12 +1055,7 @@ implementation
               { regular field -> load self on the stack }
               { regular field -> load self on the stack }
               a_load_reg_stack(list,voidpointertype,ref.base);
               a_load_reg_stack(list,voidpointertype,ref.base);
               if dup then
               if dup then
-                begin
-                  internalerror(2019083002);
-                  //todo: add duplicate
-                  //list.concat(taicpu.op_none(a_dup));
-                  incstack(list,1);
-                end;
+                a_load_reg_stack(list,voidpointertype,ref.base);
               { field name/type encoded in symbol, no index/offset }
               { field name/type encoded in symbol, no index/offset }
               result:=1;
               result:=1;
               ref.base:=NR_NO;
               ref.base:=NR_NO;