瀏覽代碼

+ FPURESULTREG -> FPU_RESULT_REG

carl 23 年之前
父節點
當前提交
448d40de1a
共有 4 個文件被更改,包括 23 次插入11 次删除
  1. 5 2
      compiler/i386/cpubase.pas
  2. 7 4
      compiler/ncgflw.pas
  3. 6 3
      compiler/ncgutil.pas
  4. 5 2
      compiler/powerpc/cpubase.pas

+ 5 - 2
compiler/i386/cpubase.pas

@@ -410,7 +410,7 @@ uses
       accumulatorhigh = R_EDX;
       { WARNING: don't change to R_ST0!! See comments above implementation of }
       { a_loadfpu* methods in rgcpu (JM)                                      }
-      fpuresultreg = R_ST;
+      fpu_result_reg = R_ST;
       mmresultreg = R_MM0;
 
 {*****************************************************************************
@@ -486,7 +486,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.26  2002-07-07 09:52:33  florian
+  Revision 1.27  2002-07-25 18:01:29  carl
+    + FPURESULTREG -> FPU_RESULT_REG
+
+  Revision 1.26  2002/07/07 09:52:33  florian
     * powerpc target fixed, very simple units can be compiled
     * some basic stuff for better callparanode handling, far from being finished
 

+ 7 - 4
compiler/ncgflw.pas

@@ -500,9 +500,9 @@ implementation
                 floatdef :
                   begin
 {$ifndef i386}
-                    cg.a_reg_alloc(exprasmlist,fpuresultreg);
+                    cg.a_reg_alloc(exprasmlist,FPU_RESULT_REG);
 {$endif not i386}
-                    cg.a_loadfpu_loc_reg(exprasmlist,left.location,fpuresultreg);
+                    cg.a_loadfpu_loc_reg(exprasmlist,left.location,FPU_RESULT_REG);
                   end;
                 else
                   begin
@@ -535,7 +535,7 @@ do_jmp:
                 cg.a_reg_dealloc(exprasmlist,accumulatorhigh);
 {$ifndef i386}
               if (aktprocdef.rettype.def.deftype = floatdef) then
-                cg.a_reg_dealloc(exprasmlist,fpuresultreg);
+                cg.a_reg_dealloc(exprasmlist,FPU_RESULT_REG);
 {$endif not i386}
            end
          else
@@ -627,7 +627,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.28  2002-07-21 06:58:49  daniel
+  Revision 1.29  2002-07-25 17:56:29  carl
+    + FPURESULTREG -> FPU_RESULT_REG
+
+  Revision 1.28  2002/07/21 06:58:49  daniel
   * Changed booleans into flags
 
   Revision 1.27  2002/07/20 12:54:53  daniel

+ 6 - 3
compiler/ncgutil.pas

@@ -1020,7 +1020,7 @@ implementation
                end;
              floatdef :
                begin
-                 cg.a_loadfpu_ref_reg(list,cgsize,href,fpuresultreg);
+                 cg.a_loadfpu_ref_reg(list,cgsize,href,FPU_RESULT_REG);
                end;
              else
                begin
@@ -1060,7 +1060,7 @@ implementation
                end;
              floatdef :
                begin
-                 cg.a_loadfpu_reg_ref(list,cgsize,fpuresultreg,href);
+                 cg.a_loadfpu_reg_ref(list,cgsize,FPU_RESULT_REG,href);
                end;
              else
                begin
@@ -1629,7 +1629,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.23  2002-07-20 11:57:54  florian
+  Revision 1.24  2002-07-25 17:58:24  carl
+    + FPURESULTREG -> FPU_RESULT_REG
+
+  Revision 1.23  2002/07/20 11:57:54  florian
     * types.pas renamed to defbase.pas because D6 contains a types
       unit so this would conflicts if D6 programms are compiled
     + Willamette/SSE2 instructions to assembler added

+ 5 - 2
compiler/powerpc/cpubase.pas

@@ -520,7 +520,7 @@ uses
       { WARNING: don't change to R_ST0!! See comments above implementation of }
       { a_loadfpu* methods in rgcpu (JM)                                      }
 {$warning I don't know the exact values, please check (PFV) }
-      fpuresultreg = R_F0;
+      FPU_RESULT_REG = R_F0;
       mmresultreg = R_M0;
 
 {*****************************************************************************
@@ -647,7 +647,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.19  2002-07-13 19:38:44  florian
+  Revision 1.20  2002-07-25 18:04:10  carl
+    + FPURESULTREG -> FPU_RESULT_REG
+
+  Revision 1.19  2002/07/13 19:38:44  florian
     * some more generic calling stuff fixed
 
   Revision 1.18  2002/07/11 14:41:34  florian