mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 01:09:31 +02:00
Avoid trying to use invalid instruction exception if Test8087 is below 2, as older CPU ignore simply invalid instructions
git-svn-id: trunk@36298 -
This commit is contained in:
parent
0f80603dae
commit
e092f00843
@ -167,6 +167,8 @@ Procedure SysInitFPU;
|
||||
fldcw localfpucw
|
||||
fwait
|
||||
end;
|
||||
if Test8087 < 2 then
|
||||
exit;
|
||||
asm
|
||||
push es
|
||||
push ds
|
||||
|
Loading…
Reference in New Issue
Block a user