Fixed class names in implementation

git-svn-id: branches/interfacertti@30844 -

compiler/arm/cpupara.pas

@@ -75,7 +75,7 @@ unit cpupara;
         result:=VOLATILE_FPUREGISTERS;
       end;
 
-    procedure tarmparamanager.get_para_regoff(proccalloption: tproccalloption; paraloc: pcgparalocation; out reg: Byte; out off: LongInt);
+    procedure tcpuparamanager.get_para_regoff(proccalloption: tproccalloption; paraloc: pcgparalocation; out reg: Byte; out off: LongInt);
     var
       I : SizeInt;
     begin

compiler/i386/cpupara.pas

@@ -286,7 +286,7 @@ unit cpupara;
         result:=[0..first_mm_imreg-1];
       end;
 
-    procedure ti386paramanager.get_para_regoff(proccalloption: tproccalloption; paraloc: pcgparalocation; out reg: Byte; out off: LongInt);
+    procedure tcpuparamanager.get_para_regoff(proccalloption: tproccalloption; paraloc: pcgparalocation; out reg: Byte; out off: LongInt);
     var
       I : SizeInt;
     begin

compiler/x86_64/cpupara.pas

@@ -906,7 +906,13 @@ unit cpupara;
           result:=[RS_XMM0..RS_XMM15];
       end;
 
-    procedure tx86_64paramanager.get_para_regoff(proccalloption: tproccalloption; paraloc: pcgparalocation; out reg: Byte; out off: LongInt);
+    function tcpuparamanager.get_volatile_registers_fpu(calloption : tproccalloption):tcpuregisterset;
+      begin
+        result:=[RS_ST0..RS_ST7];
+      end;
+
+
+    procedure tcpuparamanager.get_para_regoff(proccalloption: tproccalloption; paraloc: pcgparalocation; out reg: Byte; out off: LongInt);
     var
       I : SizeInt;
     begin
@@ -965,12 +971,6 @@ unit cpupara;
     end;
 
 
-    function tcpuparamanager.get_volatile_registers_fpu(calloption : tproccalloption):tcpuregisterset;
-      begin
-        result:=[RS_ST0..RS_ST7];
-      end;
-
-
     function tcpuparamanager.get_funcretloc(p : tabstractprocdef; side: tcallercallee; forcetempdef: tdef): tcgpara;
       const
         intretregs: array[0..1] of tregister = (NR_FUNCTION_RETURN_REG,NR_FUNCTION_RETURN_REG_HIGH);