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

+ i386 supports also avx-512

Browse Source 
git-svn-id: trunk@47317 -
This commit is contained in:
florian 2020-11-04 22:10:35 +00:00
parent b47d2bd2c2
commit 1add3490c3
1 changed files with 12 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
compiler/i386/cpuinfo.pas
View File

@ -67,7 +67,8 @@ Type
fpu_sse41,
fpu_sse42,
fpu_avx,
fpu_avx2
fpu_avx2,
fpu_avx512f
);
tcontrollertype =
@ -122,7 +123,7 @@ Const
'COREAVX2'
);
fputypestr : array[tfputype] of string[6] = (
fputypestr : array[tfputype] of string[7] = (
'NONE',
// 'SOFT',
'X87',
@ -133,13 +134,14 @@ Const
'SSE41',
'SSE42',
'AVX',
'AVX2'
'AVX2',
'AVX512F'
);
sse_singlescalar = [fpu_sse..fpu_avx2];
sse_doublescalar = [fpu_sse2..fpu_avx2];
sse_singlescalar = [fpu_sse..fpu_avx512f];
sse_doublescalar = [fpu_sse2..fpu_avx512f];
fpu_avx_instructionsets = [fpu_avx,fpu_avx2];
fpu_avx_instructionsets = [fpu_avx,fpu_avx2,fpu_avx512f];
{ Supported optimizations, only used for information }
supported_optimizerswitches = genericlevel1optimizerswitches+
@ -174,7 +176,8 @@ type
tfpuflags =
(FPUX86_HAS_AVXUNIT,
FPUX86_HAS_32MMREGS
FPUX86_HAS_32MMREGS,
FPUX86_HAS_AVX512F
);
const
@ -202,7 +205,8 @@ type
{ fpu_sse41 } [],
{ fpu_sse42 } [],
{ fpu_avx } [FPUX86_HAS_AVXUNIT],
{ fpu_avx2 } [FPUX86_HAS_AVXUNIT]
{ fpu_avx2 } [FPUX86_HAS_AVXUNIT],
{ fpu_avx512 } [FPUX86_HAS_AVXUNIT,FPUX86_HAS_32MMREGS,FPUX86_HAS_AVX512F]
);
Implementation