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

* Aarch64: cpu capabilites defines properly named

Browse Source 
* Aarch64: enable defining cpu capabilites

git-svn-id: trunk@49108 -
This commit is contained in:
florian 2021-04-02 20:57:12 +00:00
parent 9e7d80a8bd
commit f38f9ff930
2 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
compiler/aarch64/cpuinfo.pas
View File

@ -137,11 +137,11 @@ Const
type
tcpuflags =
(CPUA64_HAS_LSE { CPU supports Large System Extensions }
(CPUAARCH64_HAS_LSE { CPU supports Large System Extensions }
);
tfpuflags =
(CPUA64_HAS_VFP { CPU supports VFP }
(CPUAARCH64_HAS_VFP { CPU supports VFP }
);
const
@ -149,17 +149,17 @@ const
( { cpu_none } [],
{ cpu_armv8 } [],
{ cpu_armv8a } [],
{ cpu_armv81a } [CPUA64_HAS_LSE],
{ cpu_armv82a } [CPUA64_HAS_LSE],
{ cpu_armv83a } [CPUA64_HAS_LSE],
{ cpu_armv84a } [CPUA64_HAS_LSE],
{ cpu_armv85a } [CPUA64_HAS_LSE],
{ cpu_armv86a } [CPUA64_HAS_LSE]
{ cpu_armv81a } [CPUAARCH64_HAS_LSE],
{ cpu_armv82a } [CPUAARCH64_HAS_LSE],
{ cpu_armv83a } [CPUAARCH64_HAS_LSE],
{ cpu_armv84a } [CPUAARCH64_HAS_LSE],
{ cpu_armv85a } [CPUAARCH64_HAS_LSE],
{ cpu_armv86a } [CPUAARCH64_HAS_LSE]
);
fpu_capabilities : array[tfputype] of set of tfpuflags =
( { fpu_none } [],
{ fpu_vfp } [CPUA64_HAS_VFP]
{ fpu_vfp } [CPUAARCH64_HAS_VFP]
);
Implementation

2
compiler/fpcdefs.inc
View File

@ -313,6 +313,8 @@
{$define cpurefshaveindexreg}
{$define SUPPORT_GET_FRAME}
{$define SUPPORT_SAFECALL}
{$define cpucapabilities}
{$define fpucapabilities}
{$endif aarch64}
{$ifdef riscv32}