From 8bbe7d7268c3b44e6efa85af6fc691aafe838d89 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Mon, 19 Jun 2017 21:17:54 +0000
Subject: [PATCH] * define STACK_BIAS constant for sparc64, it is fundamental

git-svn-id: trunk@36540 -
---
 rtl/inc/systemh.inc | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/rtl/inc/systemh.inc b/rtl/inc/systemh.inc
index eb9db13333..17e1e484a1 100644
--- a/rtl/inc/systemh.inc
+++ b/rtl/inc/systemh.inc
@@ -698,6 +698,9 @@ const
   Test68000 : byte = 0;      { Must be determined at startup for both }
   Test68881 : byte = 0;
 {$endif cpum68k}
+{$ifdef cpusparc64}
+  STACK_BIAS = 2047;
+{$endif cpusparc64}
 
 { max level in dumping on error }
   Max_Frame_Dump : Word = 8;