Browse Source

+ dummy InitCpu/DoneCpu

pierre 26 years ago
parent
commit
009aaad4a9
2 changed files with 46 additions and 2 deletions
  1. 23 1
      compiler/new/alpha/cpubase.pas
  2. 23 1
      compiler/new/powerpc/cpubase.pas

+ 23 - 1
compiler/new/alpha/cpubase.pas

@@ -203,6 +203,13 @@ procedure disposereference(var r : preference);
 
 
 function reg2str(r : tregister) : string;
 function reg2str(r : tregister) : string;
 
 
+{*****************************************************************************
+                                  Init/Done
+*****************************************************************************}
+
+  procedure InitCpu;
+  procedure DoneCpu;
+  
 implementation
 implementation
 
 
 uses
 uses
@@ -252,10 +259,25 @@ begin
   r:=Nil;
   r:=Nil;
 end;
 end;
 
 
+{*****************************************************************************
+                                  Init/Done
+*****************************************************************************}
+
+  procedure InitCpu;
+    begin
+    end;
+    
+  procedure DoneCpu;
+    begin
+    end;
+  
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.13  1999-08-06 16:41:10  jonas
+  Revision 1.14  1999-08-23 23:27:55  pierre
+   + dummy InitCpu/DoneCpu
+
+  Revision 1.13  1999/08/06 16:41:10  jonas
     * PowerPC compiles again, several routines implemented in cgcpu.pas
     * PowerPC compiles again, several routines implemented in cgcpu.pas
     * added constant to cpubase of alpha and powerpc for maximum
     * added constant to cpubase of alpha and powerpc for maximum
       number of operands
       number of operands

+ 23 - 1
compiler/new/powerpc/cpubase.pas

@@ -421,6 +421,13 @@ const
 
 
     function is_calljmp(o:tasmop):boolean;
     function is_calljmp(o:tasmop):boolean;
 
 
+{*****************************************************************************
+                                  Init/Done
+*****************************************************************************}
+
+  procedure InitCpu;
+  procedure DoneCpu;
+  
 
 
 implementation
 implementation
 
 
@@ -486,10 +493,25 @@ begin
   new_reference:=r;
   new_reference:=r;
 end;
 end;
 
 
+{*****************************************************************************
+                                  Init/Done
+*****************************************************************************}
+
+  procedure InitCpu;
+    begin
+    end;
+    
+  procedure DoneCpu;
+    begin
+    end;
+  
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.4  1999-08-06 16:41:12  jonas
+  Revision 1.5  1999-08-23 23:27:54  pierre
+   + dummy InitCpu/DoneCpu
+
+  Revision 1.4  1999/08/06 16:41:12  jonas
     * PowerPC compiles again, several routines implemented in cgcpu.pas
     * PowerPC compiles again, several routines implemented in cgcpu.pas
     * added constant to cpubase of alpha and powerpc for maximum
     * added constant to cpubase of alpha and powerpc for maximum
       number of operands
       number of operands