diff options
Diffstat (limited to 'compiler/aoptobj.pas')
| -rw-r--r-- | compiler/aoptobj.pas | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/aoptobj.pas b/compiler/aoptobj.pas index 818310a259..619e24e0c5 100644 --- a/compiler/aoptobj.pas +++ b/compiler/aoptobj.pas @@ -1041,6 +1041,9 @@ Unit AoptObj; Repeat While Assigned(StartPai) And ((StartPai.typ in (SkipInstr - [ait_regAlloc])) Or +{$if defined(MIPS) or defined(SPARC)} + ((startpai.typ=ait_instruction) and (taicpu(startpai).opcode=A_NOP)) or +{$endif MIPS or SPARC} ((StartPai.typ = ait_label) and Not(Tai_Label(StartPai).labsym.Is_Used))) Do StartPai := Tai(StartPai.Next); |