paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 16:09:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* add fclex for fpu exceptions to round/trunc

Browse Source
This commit is contained in:
peter 2004-07-09 23:06:11 +00:00
parent 65591edebc
commit 783f8068a5
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/i386/math.inc
View File

@ -148,6 +148,7 @@
fistpq res
movl res,%eax
movl res+4,%edx
fclex
fldcw oldcw
end;
@ -168,12 +169,14 @@
fnstcw oldcw
fwait
movw $0x1372,newcw
fclex
fldcw newcw
fwait
fldt d
fistpq res
movl res,%eax
movl res+4,%edx
fclex
fldcw oldcw
end;
@ -207,7 +210,10 @@
{
$Log$
Revision 1.18 2003-11-29 16:40:12 jonas
Revision 1.19 2004-07-09 23:06:11 peter
* add fclex for fpu exceptions to round/trunc
Revision 1.18 2003/11/29 16:40:12 jonas
* fix power() for negative base
Revision 1.17 2003/11/24 21:57:43 michael