From a7d127cf08719f44484d44213768c9788896200f Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 16 Jul 2017 09:24:20 +0000
Subject: [PATCH] * only sparc v7 and v8 require an instruction between FCMP
 and the branch

git-svn-id: trunk@36737 -
---
 compiler/sparcgen/ncpuadd.pas | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/compiler/sparcgen/ncpuadd.pas b/compiler/sparcgen/ncpuadd.pas
index b5c8f98a68..9b20f2706d 100644
--- a/compiler/sparcgen/ncpuadd.pas
+++ b/compiler/sparcgen/ncpuadd.pas
@@ -262,8 +262,12 @@ interface
           op:=A_FCMPs;
         current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(op,
              left.location.register,right.location.register));
+
+{$ifdef SPARC32}
         { Delay slot (can only contain integer operation) }
-        current_asmdata.CurrAsmList.concat(taicpu.op_none(A_NOP));
+        if current_settings.cputype in [cpu_SPARC_V7,cpu_SPARC_V8] then
+          current_asmdata.CurrAsmList.concat(taicpu.op_none(A_NOP));
+{$endif SPARC32}
       end;