paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 16:09:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ added segment _null, belonging to group dgroup and class BEGDATA with the

Browse Source 
hexadecimal pattern 01 in order to help catch storing data at location 0
  (this is compatible with Open Watcom's C library)

git-svn-id: trunk@26866 -
This commit is contained in:
nickysn 2014-02-24 14:01:44 +00:00
parent 526d84fd47
commit 2fd09437e9
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
rtl/msdos/prt0stm.asm
View File

@ -370,6 +370,15 @@ not_enough_mem_msg:
segment bss class=bss
%ifndef __TINY__
segment _NULL class=BEGDATA
global __nullarea
__nullarea:
dd 01010101h, 01010101h, 01010101h, 01010101h
dd 01010101h, 01010101h, 01010101h, 01010101h
segment _AFTERNULL class=BEGDATA
dw 0
segment stack stack class=stack
resb 256
stacktop:
@ -378,5 +387,5 @@ not_enough_mem_msg:
%ifdef __TINY__
group dgroup text data bss
%else
group dgroup data bss stack
group dgroup _NULL _AFTERNULL data bss stack
%endif