Browse Source

+ initial files for intrinsics support on AArch64

florian 3 years ago
parent
commit
b0459a19f4
3 changed files with 56 additions and 0 deletions
  1. 16 0
      rtl/aarch64/cpuinnr.inc
  2. 14 0
      rtl/aarch64/cpuprocs.inc
  3. 26 0
      rtl/aarch64/intrinsics.pp

+ 16 - 0
rtl/aarch64/cpuinnr.inc

@@ -0,0 +1,16 @@
+  {
+    Defines CPU intrinsic indicies for AArch64
+
+    This file is part of the Free Pascal run time library.
+    Copyright (c) 2021 by the Free Pascal development team.
+
+    See the file COPYING.FPC, included in this distribution,
+    for details about the copyright.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ **********************************************************************}
+
+fpc_in_aarch64_fcadd = fpc_in_cpu_first+0;

+ 14 - 0
rtl/aarch64/cpuprocs.inc

@@ -0,0 +1,14 @@
+{
+    Defines CPU intrinsics for AArch64
+
+    This file is part of the Free Pascal run time library.
+    Copyright (c) 2021 by the Free Pascal development team.
+
+    See the file COPYING.FPC, included in this distribution,
+    for details about the copyright.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ **********************************************************************}

+ 26 - 0
rtl/aarch64/intrinsics.pp

@@ -0,0 +1,26 @@
+{
+    Provides CPU intrinsics for AArch64
+
+    This file is part of the Free Pascal run time library.
+    Copyright (c) 2021 by the Free Pascal development team.
+
+    See the file COPYING.FPC, included in this distribution,
+    for details about the copyright.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ **********************************************************************}
+unit intrinsics;
+
+  interface
+
+    const
+    {$i cpuinnr.inc}
+
+    {$i cpuprocs.inc}
+
+  implementation
+
+end.