diff --git a/compiler/riscv64/aoptcpu.pas b/compiler/riscv64/aoptcpu.pas
index 8e9ba43ef0..9aa8f4e26f 100644
--- a/compiler/riscv64/aoptcpu.pas
+++ b/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.