From d26fb3b663061b521fcdb48d84b2811a2f1dc996 Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Thu, 25 Oct 2018 06:39:42 +0000
Subject: [PATCH] Try to fix compilation error after commit #40027

git-svn-id: trunk@40028 -
---
 compiler/x86/agx86int.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/compiler/x86/agx86int.pas b/compiler/x86/agx86int.pas
index 431317d8f4..c11f3e6fe0 100644
--- a/compiler/x86/agx86int.pas
+++ b/compiler/x86/agx86int.pas
@@ -886,6 +886,7 @@ implementation
                else if (asminfo^.id=as_x86_64_masm) and
                  (fixed_opcode=A_MOVQ) then
                  writer.AsmWrite(#9#9'mov')
+{$ifdef I386}
                else if (asminfo^.id = as_i386_wasm) and ((fixed_opcode=A_RETD)
                        or (fixed_opcode=A_RETND) or (fixed_opcode=A_RETFD)) then
                  begin
@@ -899,6 +900,7 @@ implementation
                          writer.AsmWrite(#9#9'retf');
                    end
                  end
+{$endif I386}
                else
                  writer.AsmWrite(#9#9+prefix+std_op2str[fixed_opcode]+cond2str[taicpu(hp).condition]+suffix);
                if taicpu(hp).ops<>0 then