diff --git a/compiler/aasm.pas b/compiler/aasm.pas index 3d623b6379..fba6dc13d6 100644 --- a/compiler/aasm.pas +++ b/compiler/aasm.pas @@ -28,18 +28,6 @@ unit aasm; globtype,systems,cobjects,files,globals; 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 = ( ait_none, @@ -978,7 +966,10 @@ uses end. { $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 Revision 1.55 1999/08/01 23:55:55 michael diff --git a/compiler/i386base.pas b/compiler/i386base.pas index 4ea26321a0..10d52edaf4 100644 --- a/compiler/i386base.pas +++ b/compiler/i386base.pas @@ -464,6 +464,24 @@ const {$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 *****************************************************************************} @@ -989,7 +1007,10 @@ begin end. { $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 Revision 1.7 1999/08/02 17:17:09 florian