From d4565aeec2d87878f7b010dd6b9591ff9a9a1b4c Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Thu, 29 May 2014 14:57:48 +0000
Subject: [PATCH] * in i8086 far data memory models add reference to the
 beginning of stack from   the startup code, so the object module, containing
 the stack segment doesn't   get smartlinked away

git-svn-id: trunk@27824 -
---
 rtl/msdos/prt0comn.asm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/rtl/msdos/prt0comn.asm b/rtl/msdos/prt0comn.asm
index f5471e24c0..c5fb06b773 100644
--- a/rtl/msdos/prt0comn.asm
+++ b/rtl/msdos/prt0comn.asm
@@ -53,6 +53,10 @@
         extern __nearheap_start
         extern __nearheap_end
 
+%ifdef __FAR_DATA__
+        extern ___stack
+%endif
+
         extern __SaveInt00
 
         extern FPC_HANDLEERROR
@@ -473,6 +477,11 @@ __nullarea:
         segment stack stack class=stack
         resb 256
         stacktop:
+    %else
+        segment data
+        ; add reference to the beginning of stack, so the object module,
+        ; containing the stack segment doesn't get smartlinked away
+        dd ___stack
     %endif
 %endif