From c68ddc5360cf4e1c7a543cfba9e469f21a434ec3 Mon Sep 17 00:00:00 2001
From: Pierre Muller <pierre@freepascal.org>
Date: Mon, 25 Mar 2024 23:47:11 +0100
Subject: [PATCH] Add $EMUL also for sparc CPU GNU linker call on solaris OS

---
 compiler/systems/t_sunos.pas | 16 ++++++++++++----
 1 file changed, 12 insertions(+), 4 deletions(-)

diff --git a/compiler/systems/t_sunos.pas b/compiler/systems/t_sunos.pas
index c503fe70b7..cae0e64310 100644
--- a/compiler/systems/t_sunos.pas
+++ b/compiler/systems/t_sunos.pas
@@ -95,8 +95,11 @@ const
 {$endif }
 {$ifdef sparc}
 const
-  { no emulation specification needed, as long as only 32-bit is supported }
-  gnu_emul = '';
+  gnu_emul = '-m elf32_sparc_sol2';
+{$endif}
+{$ifdef sparc64}
+const
+  gnu_emul = '-m elf64_sparc_sol2';
 {$endif}
 
 Constructor TLinkersolaris.Create;
@@ -136,8 +139,13 @@ const
 {$endif }
 {$ifdef sparc}
 const
-  gld = 'gld ';
-  solaris_ld = 'ld ';
+  gld = 'gld $EMUL';
+  solaris_ld = 'ld -m32';
+{$endif}
+{$ifdef sparc64}
+const
+  gld = 'gld $EMUL';
+  solaris_ld = 'ld -m64';
 {$endif}
 begin
   Glibc2:=false;