mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-28 21:00:28 +02:00
* added segprefix field for i386 in tainstruction object
This commit is contained in:
parent
fc6b6505fd
commit
6531f55008
@ -43,6 +43,9 @@ tainstruction = object(tai)
|
||||
condition : TAsmCond;
|
||||
ops : longint;
|
||||
oper : array[0..max_operands-1] of toper;
|
||||
{$ifdef i386}
|
||||
segprefix: tregister;
|
||||
{$endif i386}
|
||||
Constructor init(op : tasmop);
|
||||
Destructor Done;virtual;
|
||||
function getcopy:plinkedlist_item;virtual;
|
||||
@ -243,7 +246,10 @@ end.
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.2 1999-08-06 16:38:37 jonas
|
||||
Revision 1.3 1999-08-26 14:52:59 jonas
|
||||
* added segprefix field for i386 in tainstruction object
|
||||
|
||||
Revision 1.2 1999/08/06 16:38:37 jonas
|
||||
* declared getcopy virtual, since it's already declared as such
|
||||
in cobjects.pas (FPC doesn't error on that, TP does)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user