From f5a9442910d24f34372c80cea0b05789084f6b51 Mon Sep 17 00:00:00 2001 From: nickysn Date: Sun, 9 Jun 2013 12:44:03 +0000 Subject: [PATCH] + added the appropriate startup code names for each memory model git-svn-id: trunk@24832 - --- compiler/systems/t_msdos.pas | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/compiler/systems/t_msdos.pas b/compiler/systems/t_msdos.pas index bd9511e958..3edbb19283 100644 --- a/compiler/systems/t_msdos.pas +++ b/compiler/systems/t_msdos.pas @@ -246,10 +246,14 @@ begin DOS command line is limited to 126 characters! } { add objectfiles, start with prt0 always } - if current_settings.x86memorymodel=mm_tiny then - LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0t','',false))) - else - LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0s','',false))); + case current_settings.x86memorymodel of + mm_tiny: LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0t','',false))); + mm_small: LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0s','',false))); + mm_medium: LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0m','',false))); + mm_compact: LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0c','',false))); + mm_large: LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0l','',false))); + mm_huge: LinkRes.Add('file ' + maybequoted(FindObjectFile('prt0h','',false))); + end; while not ObjectFiles.Empty do begin s:=ObjectFiles.GetFirst;