浏览代码

* cleanup

florian 3 月之前
父节点
当前提交
d6825a3561
共有 1 个文件被更改,包括 0 次插入46 次删除
  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.