paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 10:49:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

* only change the assembler to the default external assembler for Win32 when

Browse Source 
using DWARF if it hasn't been changed yet

git-svn-id: trunk@12886 -
This commit is contained in:
Jonas Maebe 2009-03-14 15:28:00 +00:00
parent 8d2f3946e0
commit 145a7bf304
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/options.pas
View File

@ -2195,10 +2195,11 @@ begin
which is required for dwarf on win32 (mantis 12872) which is required for dwarf on win32 (mantis 12872)
} }
if (paratargetdbg in [dbg_dwarf2,dbg_dwarf3]) and if (paratargetdbg in [dbg_dwarf2,dbg_dwarf3]) and
(target_info.system = system_i386_win32) then (target_info.system = system_i386_win32) and
(target_asm.id = target_info.assem) then
begin begin
Message(option_switch_bin_to_src_assembler); Message(option_switch_bin_to_src_assembler);
set_target_asm(target_info.assemextern); set_target_asm(target_info.assemextern);
end; end;
end; end;