From a517ada5399a06eee2032cf5b43409437c9039bc Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 10 Sep 2023 19:27:21 +0200
Subject: [PATCH]   * on aarch64-darwin, the unused part of function results is
 not cleared

---
 compiler/aarch64/cpupara.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/aarch64/cpupara.pas b/compiler/aarch64/cpupara.pas
index faac976846..f2782dd211 100644
--- a/compiler/aarch64/cpupara.pas
+++ b/compiler/aarch64/cpupara.pas
@@ -311,7 +311,7 @@ unit cpupara;
 
            This is not required for iOS, where the result is zero/sign extended.
          }
-         if (target_info.abi<>abi_aarch64_darwin) and
+         if (target_info.system<>system_aarch64_ios) and
             (side=callerside) and (result.location^.loc = LOC_REGISTER) and
             (result.def.size<8) and is_ordinal(result.def) then
            begin