summaryrefslogtreecommitdiff
path: root/compiler/aarch64/cpubase.pas
diff options
context:
space:
mode:
authorjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2018-12-16 20:44:24 +0000
committerjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2018-12-16 20:44:24 +0000
commit1fd2cb09865936ec223027a66f21b60890b95fbc (patch)
treed420ccaa1f4135f0424a9bd40017029a859f1982 /compiler/aarch64/cpubase.pas
parent929f00633d678acf221796b3e5733ec0fbeda556 (diff)
downloadfpc-1fd2cb09865936ec223027a66f21b60890b95fbc.tar.gz
* support OS_32/OS_64 in AArch64 cgsize2subreg() for MM registers (can happen
for records with floating point fields with the LLVM code generator) git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@40570 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/aarch64/cpubase.pas')
-rw-r--r--compiler/aarch64/cpubase.pas3
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/aarch64/cpubase.pas b/compiler/aarch64/cpubase.pas
index dc71039dff..252ec8ab54 100644
--- a/compiler/aarch64/cpubase.pas
+++ b/compiler/aarch64/cpubase.pas
@@ -368,8 +368,11 @@ unit cpubase;
R_MMREGISTER:
begin
case s of
+ { records }
+ OS_32,
OS_F32:
cgsize2subreg:=R_SUBMMS;
+ OS_64,
OS_F64:
cgsize2subreg:=R_SUBMMD;
else