From 2dc8839af591af6b085d07c3dde04d511bfdd9d5 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Sat, 14 Jun 2014 16:01:22 +0000
Subject: [PATCH] * set class=data to all data segments/sections on i8086

git-svn-id: trunk@27957 -
---
 compiler/x86/agx86nsm.pas | 6 +++---
 rtl/msdos/prt0comn.asm    | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/compiler/x86/agx86nsm.pas b/compiler/x86/agx86nsm.pas
index 35ae566c51..c4a225501e 100644
--- a/compiler/x86/agx86nsm.pas
+++ b/compiler/x86/agx86nsm.pas
@@ -1210,9 +1210,9 @@ interface
         AsmWriteLn('SECTION ' + CodeSectionName(current_module.modulename^) + ' use16 class=code');
       { NASM complains if you put a missing section in the GROUP directive, so }
       { we add empty declarations to make sure they exist, even if empty }
-      AsmWriteLn('SECTION .rodata');
-      AsmWriteLn('SECTION .data');
-      AsmWriteLn('SECTION .fpc');
+      AsmWriteLn('SECTION .rodata class=data');
+      AsmWriteLn('SECTION .data class=data');
+      AsmWriteLn('SECTION .fpc class=data');
       { WLINK requires class=bss in order to leave the BSS section out of the executable }
       AsmWriteLn('SECTION .bss class=bss');
       if current_settings.x86memorymodel<>mm_tiny then
diff --git a/rtl/msdos/prt0comn.asm b/rtl/msdos/prt0comn.asm
index c7bc3010d7..1a102cef0c 100644
--- a/rtl/msdos/prt0comn.asm
+++ b/rtl/msdos/prt0comn.asm
@@ -460,7 +460,7 @@ FPC_CHECK_NULLAREA:
         ret
 %endif
 
-        segment data
+        segment data class=data
 mem_realloc_err_msg:
         db 'Memory allocation error', 13, 10, '$'
 not_enough_mem_msg: