paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-06 17:03:04 +01:00
Code Issues Packages Projects Releases Wiki Activity

* attsuffix table is also needed for ra386int

Browse Source
This commit is contained in:
peter 2000-05-23 20:33:37 +00:00
parent 72f2e9434d
commit cafbded190
1 changed files with 18 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
compiler/cpubase.pas
View File

@ -80,6 +80,16 @@ const
{$endif} {$endif}
{$endif} {$endif}
{ We need the AT&T suffix table for both asm readers and AT&T writer }
{$define ATTSUF}
{$ifdef NORA386INT}
{$ifdef NORA386ATT}
{$ifdef NOAG386ATT}
{$undef ATTSUF}
{$endif}
{$endif}
{$endif}
const const
{ Operand types } { Operand types }
OT_NONE = $00000000; OT_NONE = $00000000;
@ -224,10 +234,12 @@ const
{$ifdef ATTOP} {$ifdef ATTOP}
att_op2str:op2strtable= att_op2str:op2strtable=
{$i i386att.inc} {$i i386att.inc}
{$endif ATTOP}
{$ifdef ATTSUF}
att_needsuffix:array[tasmop] of TAttSuffix= att_needsuffix:array[tasmop] of TAttSuffix=
{$i i386atts.inc} {$i i386atts.inc}
{$endif ATTOP} {$endif ATTSUF}
{***************************************************************************** {*****************************************************************************
@ -907,7 +919,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.29 2000-05-12 21:57:02 pierre Revision 1.30 2000-05-23 20:33:37 peter
* attsuffix table is also needed for ra386int
Revision 1.29 2000/05/12 21:57:02 pierre
+ use of a dictionary object + use of a dictionary object
for faster opcode searching in assembler readers for faster opcode searching in assembler readers
implemented by Kovacs Attila Zoltan implemented by Kovacs Attila Zoltan
@ -1005,4 +1020,4 @@ end.
+ floating point register variables !! + floating point register variables !!
* pairegalloc is now generated for register variables * pairegalloc is now generated for register variables
} }