Răsfoiți Sursa

* symaddr ==> refaddr to follow the rest of compiler changes

mazen 21 ani în urmă
părinte
comite
b1bffd0a95
2 a modificat fișierele cu 13 adăugiri și 11 ștergeri
  1. 5 2
      compiler/sparc/aasmcpu.pas
  2. 8 9
      compiler/sparc/cpubase.pas

+ 5 - 2
compiler/sparc/aasmcpu.pas

@@ -170,7 +170,7 @@ implementation
       begin
          inherited create(op);
          { only allowed to load the address }
-         if not(_op2.symaddr in [refs_lo,refs_hi]) then
+         if not(_op2.refaddr in [addr_lo,addr_hi]) then
            internalerror(200305311);
          ops:=3;
          loadreg(0,_op1);
@@ -297,7 +297,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.43  2004-02-08 23:10:21  jonas
+  Revision 1.44  2004-02-27 11:47:32  mazen
+  * symaddr ==> refaddr to follow the rest of compiler changes
+
+  Revision 1.43  2004/02/08 23:10:21  jonas
     * taicpu.is_same_reg_move() now gets a regtype parameter so it only
       removes moves of that particular register type. This is necessary so
       we don't remove the live_start instruction of a register before it

+ 8 - 9
compiler/sparc/cpubase.pas

@@ -168,10 +168,10 @@ uses
          offset      : longint;
          { symbol this reference refers to, nil if none }
          symbol      : tasmsymbol;
-         { used in conjunction with symbols and offsets: refs_full means }
-         { means a full 32bit reference, refs_hi means the upper 16 bits }
-         { and refs_lo the lower 16 bits of the address                   }
-         symaddr     : trefsymaddr;
+         { symbol the symbol of this reference is relative to, nil if none }
+         relsymbol      : tasmsymbol;
+         { reference type addr or symbol itself }
+         refaddr : trefaddr;
          { changed when inlining and possibly in other cases, don't }
          { set manually                                             }
          offsetfixup : longint;
@@ -188,10 +188,6 @@ uses
          offset      : longint;
       end;
 
-    const
-      symaddr2str: array[trefsymaddr] of string[3] = ('','','%hi','%lo');
-
-
 {*****************************************************************************
                                 Operand Sizes
 *****************************************************************************}
@@ -548,7 +544,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.62  2004-02-27 10:21:05  florian
+  Revision 1.63  2004-02-27 11:43:56  mazen
+  * symaddr ==> refaddr to follow the rest of compiler changes
+
+  Revision 1.62  2004/02/27 10:21:05  florian
     * top_symbol killed
     + refaddr to treference added
     + refsymbol to treference added