diff options
| author | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2017-07-29 20:06:14 +0000 |
|---|---|---|
| committer | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2017-07-29 20:06:14 +0000 |
| commit | caf6daeb6bf0da2c9825c626680b869198770650 (patch) | |
| tree | 16e2ed72e01a02eb4d7a8cd9b47c5b6db0e574f6 /compiler/aoptobj.pas | |
| parent | 59f4928a434a120640643d8a896f0137892af5ef (diff) | |
| download | fpc-caf6daeb6bf0da2c9825c626680b869198770650.tar.gz | |
* made nop handling generic for sparc, so it is used by sparc64 as well
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@36814 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/aoptobj.pas')
| -rw-r--r-- | compiler/aoptobj.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/aoptobj.pas b/compiler/aoptobj.pas index 34f55db2f0..866990ef9f 100644 --- a/compiler/aoptobj.pas +++ b/compiler/aoptobj.pas @@ -1049,7 +1049,7 @@ Unit AoptObj; Repeat While Assigned(StartPai) And ((StartPai.typ in (SkipInstr - [ait_regAlloc])) Or -{$if defined(MIPS) or defined(SPARC)} +{$if defined(MIPS) or defined(SPARCGEN)} ((startpai.typ=ait_instruction) and (taicpu(startpai).opcode=A_NOP)) or {$endif MIPS or SPARC} ((StartPai.typ = ait_label) and |