Browse Source

* Moved toperand type back =(

michael 26 years ago
parent
commit
4f74c54c09
2 changed files with 26 additions and 14 deletions
  1. 4 13
      compiler/aasm.pas
  2. 22 1
      compiler/i386base.pas

+ 4 - 13
compiler/aasm.pas

@@ -28,18 +28,6 @@ unit aasm;
        globtype,systems,cobjects,files,globals;
        globtype,systems,cobjects,files,globals;
 
 
     type
     type
-       { Types of operand }
-        toptype=(top_none,top_reg,top_ref,top_const,top_symbol);
-
-        toper=record
-          ot  : longint;
-          case typ : toptype of
-           top_none   : ();
-           top_reg    : (reg:tregister);
-           top_ref    : (ref:preference);
-           top_const  : (val:longint);
-           top_symbol : (sym:pasmsymbol;symofs:longint);
-        end;
 
 
        tait = (
        tait = (
           ait_none,
           ait_none,
@@ -978,7 +966,10 @@ uses
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.56  1999-08-02 20:45:47  michael
+  Revision 1.57  1999-08-02 21:01:41  michael
+  * Moved toperand type back =(
+
+  Revision 1.56  1999/08/02 20:45:47  michael
   * Moved toperand type to aasm
   * Moved toperand type to aasm
 
 
   Revision 1.55  1999/08/01 23:55:55  michael
   Revision 1.55  1999/08/01 23:55:55  michael

+ 22 - 1
compiler/i386base.pas

@@ -464,6 +464,24 @@ const
 {$endif}
 {$endif}
 
 
 
 
+{*****************************************************************************
+                                Operands
+*****************************************************************************}
+
+
+       { Types of operand }
+        toptype=(top_none,top_reg,top_ref,top_const,top_symbol);
+
+        toper=record
+          ot  : longint;
+          case typ : toptype of
+           top_none   : ();
+           top_reg    : (reg:tregister);
+           top_ref    : (ref:preference);
+           top_const  : (val:longint);
+           top_symbol : (sym:pasmsymbol;symofs:longint);
+        end;
+
 {*****************************************************************************
 {*****************************************************************************
                                 Conditions
                                 Conditions
 *****************************************************************************}
 *****************************************************************************}
@@ -989,7 +1007,10 @@ begin
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.8  1999-08-02 20:45:49  michael
+  Revision 1.9  1999-08-02 21:01:45  michael
+  * Moved toperand type back =(
+
+  Revision 1.8  1999/08/02 20:45:49  michael
   * Moved toperand type to aasm
   * Moved toperand type to aasm
 
 
   Revision 1.7  1999/08/02 17:17:09  florian
   Revision 1.7  1999/08/02 17:17:09  florian