Explorar o código

* killed legacy x87 code for Win64

git-svn-id: trunk@288 -
florian %!s(int64=20) %!d(string=hai) anos
pai
achega
bffd9f2cc7
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  1. 2 0
      rtl/x86_64/x86_64.inc

+ 2 - 0
rtl/x86_64/x86_64.inc

@@ -370,9 +370,11 @@ const
 {$define FPC_SYSTEM_HAS_SYSRESETFPU}
 Procedure SysResetFPU;assembler;{$ifdef SYSTEMINLINE}inline;{$endif}
 asm
+{$ifndef WIN64}
   { initialize fpu }
   fninit
   fwait
+{$endif WIN64}
 {$ifdef FPC_PIC}
   movq fpucw@GOTPCREL(%rip),%rax
   fldcw (%rax)