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

* only store debug link file name in .gnu_debuglink section

Browse Source 
(mantis #13324)

git-svn-id: trunk@12884 -
This commit is contained in:
Jonas Maebe 2009-03-14 14:03:38 +00:00
parent 2b69768afc
commit 78c12ba82b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/link.pas
View File

@ -1076,7 +1076,7 @@ Implementation
{ create executable with link to just created debuginfo file } { create executable with link to just created debuginfo file }
exeoutput.ExeWriteMode:=ewm_exeonly; exeoutput.ExeWriteMode:=ewm_exeonly;
exeoutput.RemoveDebugInfo; exeoutput.RemoveDebugInfo;
exeoutput.GenerateDebugLink(dbgname,GetFileCRC(dbgname)); exeoutput.GenerateDebugLink(ExtractFileName(dbgname),GetFileCRC(dbgname));
ParseScript_MemPos; ParseScript_MemPos;
ParseScript_DataPos; ParseScript_DataPos;
exeoutput.WriteExeFile(outputname); exeoutput.WriteExeFile(outputname);