diff options
Diffstat (limited to 'compiler/sparc/aoptcpu.pas')
| -rw-r--r-- | compiler/sparc/aoptcpu.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/sparc/aoptcpu.pas b/compiler/sparc/aoptcpu.pas index bc31c671eb..01ce2c0749 100644 --- a/compiler/sparc/aoptcpu.pas +++ b/compiler/sparc/aoptcpu.pas @@ -127,7 +127,7 @@ unit aoptcpu; Result:=GetNextInstruction(Next,Next); until {not(cs_opt_level3 in current_settings.optimizerswitches) or} not(Result) or (Next.typ<>ait_instruction) or (RegInInstruction(reg,Next)) or (is_calljmp(taicpu(Next).opcode)); - if is_calljmp(taicpu(next).opcode) then + if result and (next.typ=ait_instruction) and is_calljmp(taicpu(next).opcode) then begin result:=false; next:=nil; |