Explorar o código

* only store debug link file name in .gnu_debuglink section
(mantis #13324)

git-svn-id: trunk@12884 -

Jonas Maebe %!s(int64=16) %!d(string=hai) anos
pai
achega
78c12ba82b
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/link.pas

+ 1 - 1
compiler/link.pas

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