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