From 69fcacc9487aac44b1bc9b5cc9aef2d219122369 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 29 Sep 2020 20:59:29 +0000
Subject: [PATCH]   * use fld/fst on i386 to copy doubles

git-svn-id: trunk@47009 -
---
 compiler/ncgld.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/compiler/ncgld.pas b/compiler/ncgld.pas
index 6e88193c17..86fbaed98b 100644
--- a/compiler/ncgld.pas
+++ b/compiler/ncgld.pas
@@ -882,7 +882,8 @@ implementation
                            ((left.location.size<>right.location.size)
                            { on newer (1993+ :)) x86 cpus, use the fpu to copy extended values }
 {$ifdef x86}
-                            or ({$ifndef x86_64}(current_settings.cputype>=cpu_Pentium) and{$endif x86_64} (is_extended(right.resultdef)))
+                            or ({$ifndef x86_64}(current_settings.cputype>=cpu_Pentium) and{$endif x86_64}
+                            (is_extended(right.resultdef) {$ifdef i386} or is_double(right.resultdef){$endif i386} ))
 {$endif x86}
                            )then
                           begin