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

Dwarfviewer: update dwarf loading (recent refactor)

Browse Source 
git-svn-id: trunk@58401 -
This commit is contained in:
martin 2018-06-25 13:48:58 +00:00
parent 00112a0fe0
commit ef0ef04087
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/fpdebug/test/dwarfviewer/unit1.pas
View File

@ -200,7 +200,8 @@ begin
UnLoadDwarf;
ImageLoader := TDbgImageLoader.Create(FFileName);
FImageLoaderList := TDbgImageLoaderList.Create(True);
FImageLoaderList.Add(ImageLoader);
ImageLoader.AddToLoaderList(FImageLoaderList);
FDwarfInfo := TFpDwarfInfo.Create(FImageLoaderList);
FCUCount := FDwarfInfo.LoadCompilationUnits;
end;