paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 21:49:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* call SysResetFPU and SysInitFPU in InitThread for the time being

Browse Source
This commit is contained in:
florian 2025-01-24 22:56:38 +01:00
parent 223745f6b7
commit 28a9a44894
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/thread.inc
View File

@ -35,6 +35,8 @@ Var
procedure InitThread(stklen:SizeUInt); procedure InitThread(stklen:SizeUInt);
begin begin
{$ifndef FPUNONE} {$ifndef FPUNONE}
SysInitFPU;
{ the call to SysResetFPU should not be needed here, but SysInitFPU is not properly implemented for all CPUs yet }
SysResetFPU; SysResetFPU;
{$endif} {$endif}
{$ifndef HAS_MEMORYMANAGER} {$ifndef HAS_MEMORYMANAGER}