paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 13:11:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

* x86-64: removed some fwait instructions from fpc_frac_real, they shouldn't be necessary

Browse Source 
git-svn-id: trunk@49626 -
This commit is contained in:
florian 2021-07-21 20:41:31 +00:00
parent ade1bad057
commit fafee8b85b
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/x86_64/math.inc
View File

@ -292,19 +292,17 @@ const
oldcw,newcw: word; oldcw,newcw: word;
asm asm
fnstcw oldcw fnstcw oldcw
fwait
movw oldcw,%cx movw oldcw,%cx
orw $0x0c3f,%cx orw $0x0c3f,%cx
movw %cx,newcw movw %cx,newcw
fldcw newcw fldcw newcw
fwait
fldt d fldt d
frndint frndint
fldt d fldt d
fsub %st(1),%st fsub %st(1),%st
fstp %st(1) fstp %st(1)
fnclex
fldcw oldcw fldcw oldcw
fwait
end; end;
{$endif FPC_SYSTEM_HAS_FRAC} {$endif FPC_SYSTEM_HAS_FRAC}