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

FpDebug: fix compile on Mac

Browse Source 
git-svn-id: trunk@62771 -
This commit is contained in:
martin 2020-03-17 12:42:13 +00:00
parent f867f60b13
commit 57dc078ec5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/fpdebug/fpdbgdarwinclasses.pas
View File

@ -718,8 +718,8 @@ end;
class function TDbgDarwinProcess.isSupported(ATargetInfo: TTargetDescriptor
): boolean;
begin
result := (target.OS = osDarwin) and
(target.machineType = mtX86_64);
result := (ATargetInfo.OS = osDarwin) and
(ATargetInfo.machineType = mtX86_64);
end;
function TDbgDarwinProcess.ReadData(const AAdress: TDbgPtr;