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

+ added Test8086, Test8087, has_sse_support and has_mmx_support vars for i8086

Browse Source 
git-svn-id: branches/i8086@23827 -
This commit is contained in:
nickysn 2013-03-14 13:29:42 +00:00
parent 897967b8ff
commit 47ff0a520d
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/inc/systemh.inc
View File

@ -505,6 +505,16 @@ const
has_sse_support : boolean = false;
has_mmx_support : boolean = false;
{$endif cpui386}
{$ifdef cpui8086}
{ will be detected at startup }
{ 0=8086, 1=80286, 2=80386 }
Test8086 : byte = 0;
{ Always 387 or newer. Emulated if needed. }
Test8087 : byte = 3;
{ will be detected at startup }
has_sse_support : boolean = false;
has_mmx_support : boolean = false;
{$endif cpui8086}
{$ifdef cpum68k}
Test68000 : byte = 0; { Must be determined at startup for both }
Test68881 : byte = 0;