Browse Source

* killed legacy x87 code for Win64

git-svn-id: trunk@288 -
florian 20 years ago
parent
commit
bffd9f2cc7
1 changed files with 2 additions and 0 deletions
  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)