Browse Source

* in taicpu.op_XXX call create(op) instead of inherited create(op), because we want to call our overriden constructor

Nikolay Nikolov 3 days ago
parent
commit
b0879f9abb
1 changed files with 10 additions and 10 deletions
  1. 10 10
      compiler/wasm32/aasmcpu.pas

+ 10 - 10
compiler/wasm32/aasmcpu.pas

@@ -1947,13 +1947,13 @@ uses
 
 
     constructor taicpu.op_none(op : tasmop);
     constructor taicpu.op_none(op : tasmop);
       begin
       begin
-        inherited create(op);
+        create(op);
       end;
       end;
 
 
 
 
     constructor taicpu.op_reg(op : tasmop;_op1 : tregister);
     constructor taicpu.op_reg(op : tasmop;_op1 : tregister);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=1;
         ops:=1;
 {$ifdef EXTDEBUG}
 {$ifdef EXTDEBUG}
         if getregtype(_op1)=R_INVALIDREGISTER then
         if getregtype(_op1)=R_INVALIDREGISTER then
@@ -1965,7 +1965,7 @@ uses
 
 
     constructor taicpu.op_ref(op : tasmop;const _op1 : treference);
     constructor taicpu.op_ref(op : tasmop;const _op1 : treference);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=1;
         ops:=1;
         loadref(0,_op1);
         loadref(0,_op1);
         if op in [a_local_get,a_local_set,a_local_tee] then
         if op in [a_local_get,a_local_set,a_local_tee] then
@@ -1983,7 +1983,7 @@ uses
 
 
     constructor taicpu.op_const(op : tasmop;_op1 : aint);
     constructor taicpu.op_const(op : tasmop;_op1 : aint);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=1;
         ops:=1;
         loadconst(0,_op1);
         loadconst(0,_op1);
       end;
       end;
@@ -1991,7 +1991,7 @@ uses
 
 
     constructor taicpu.op_sym(op : tasmop;_op1 : tasmsymbol);
     constructor taicpu.op_sym(op : tasmop;_op1 : tasmsymbol);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=1;
         ops:=1;
         loadsymbol(0,_op1,0);
         loadsymbol(0,_op1,0);
       end;
       end;
@@ -1999,7 +1999,7 @@ uses
 
 
     constructor taicpu.op_sym_const(op: tasmop; _op1: tasmsymbol; _op2: aint);
     constructor taicpu.op_sym_const(op: tasmop; _op1: tasmsymbol; _op2: aint);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=2;
         ops:=2;
         loadsymbol(0,_op1,0);
         loadsymbol(0,_op1,0);
         loadconst(1,_op2);
         loadconst(1,_op2);
@@ -2008,7 +2008,7 @@ uses
 
 
     constructor taicpu.op_sym_functype(op : tasmop;_op1 : tasmsymbol;_op2 : TWasmFuncType);
     constructor taicpu.op_sym_functype(op : tasmop;_op1 : tasmsymbol;_op2 : TWasmFuncType);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=2;
         ops:=2;
         loadsymbol(0,_op1,0);
         loadsymbol(0,_op1,0);
         loadfunctype(1,_op2);
         loadfunctype(1,_op2);
@@ -2017,7 +2017,7 @@ uses
 
 
     constructor taicpu.op_single(op: tasmop; _op1: single);
     constructor taicpu.op_single(op: tasmop; _op1: single);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=1;
         ops:=1;
         loadsingle(0,_op1);
         loadsingle(0,_op1);
       end;
       end;
@@ -2025,14 +2025,14 @@ uses
 
 
     constructor taicpu.op_double(op: tasmop; _op1: double);
     constructor taicpu.op_double(op: tasmop; _op1: double);
       begin
       begin
-        inherited create(op);
+        create(op);
         ops:=1;
         ops:=1;
         loaddouble(0,_op1);
         loaddouble(0,_op1);
       end;
       end;
 
 
     constructor taicpu.op_functype(op: tasmop; _op1: TWasmFuncType);
     constructor taicpu.op_functype(op: tasmop; _op1: TWasmFuncType);
       begin
       begin
-       inherited create(op);
+       create(op);
        ops:=1;
        ops:=1;
        loadfunctype(0,_op1);
        loadfunctype(0,_op1);
       end;
       end;