paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-06 01:29:55 +01:00
Code Issues Packages Projects Releases Wiki Activity

* use the 'order' wlink directive to specify the segment order, instead of using

Browse Source 
'option dosseg'. This allows us more flexibility in setting up the segment
  order the way we like.

git-svn-id: trunk@27958 -
This commit is contained in:
nickysn 2014-06-14 18:04:58 +00:00
parent 2dc8839af5
commit 49f93b4464
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/systems/t_msdos.pas
View File

@ -277,7 +277,10 @@ begin
LinkRes.Add('format dos com')
else
LinkRes.Add('format dos');
LinkRes.Add('option dosseg');
if current_settings.x86memorymodel=mm_tiny then
LinkRes.Add('order clname CODE clname DATA clname BSS')
else
LinkRes.Add('order clname CODE clname BEGDATA segment _NULL segment _AFTERNULL clname DATA clname BSS clname STACK');
if (cs_link_map in current_settings.globalswitches) then
LinkRes.Add('option map='+maybequoted(ChangeFileExt(current_module.exefilename,'.map')));
LinkRes.Add('name ' + maybequoted(current_module.exefilename));