florian 3 luni în urmă
părinte
comite
d6825a3561
1 a modificat fișierele cu 0 adăugiri și 46 ștergeri
  1. 0 46
      compiler/riscv64/aoptcpu.pas

+ 0 - 46
compiler/riscv64/aoptcpu.pas

@@ -41,56 +41,10 @@ uses
 type
 
   TCpuAsmOptimizer = class(TRVCpuAsmOptimizer)
-    { uses the same constructor as TAopObj }
-    function PeepHoleOptPass1Cpu(var p: tai): boolean; override;
-
-    function PostPeepHoleOptsCpu(var p: tai): boolean; override;
   end;
 
 implementation
 
-  uses
-    cutils;
-
-
-  function TCpuAsmOptimizer.PeepHoleOptPass1Cpu(var p: tai): boolean;
-    var
-      next1, next2: tai;
-      l1, l2, shlcount: longint;
-    begin
-      result := inherited PeepHoleOptPass1Cpu(p);
-      if result then
-        exit;
-
-      case p.typ of
-        ait_instruction:
-          begin
-            {case taicpu(p).opcode of
-            end;}
-          end;
-        else
-          ;
-      end;
-    end;
-
-
-  function TCpuAsmOptimizer.PostPeepHoleOptsCpu(var p: tai): boolean;
-    var
-      next1: tai;
-    begin
-      result := inherited PostPeepHoleOptsCpu(p);
-      if result then
-        exit;
-
-      case p.typ of
-        ait_instruction:
-          begin
-          end;
-        else
-          ;
-      end;
-    end;
-
 begin
   casmoptimizer := TCpuAsmOptimizer;
 end.