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

LazDebuggerLldb: Add default lldb exe path (*nix)

Browse Source 
git-svn-id: trunk@60404 -
This commit is contained in:
martin 2019-02-11 15:40:21 +00:00
parent f5f55eaf16
commit 4bb5c5ff41
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
components/lazdebuggers/lazdebuggerlldb/lldbdebugger.pas
View File

@ -333,7 +333,7 @@ type
public public
// class function CreateProperties: TDebuggerProperties; override; // Creates debuggerproperties // class function CreateProperties: TDebuggerProperties; override; // Creates debuggerproperties
class function Caption: String; override; class function Caption: String; override;
// class function ExePaths: String; override; class function ExePaths: String; override;
constructor Create(const AExternalDebugger: String); override; constructor Create(const AExternalDebugger: String); override;
destructor Destroy; override; destructor Destroy; override;
@ -2824,6 +2824,15 @@ begin
Result := 'LLDB Debugger (Alpha)'; Result := 'LLDB Debugger (Alpha)';
end; end;
class function TLldbDebugger.ExePaths: String;
begin
{$IFdef MSWindows}
Result := '';
{$ELSE}
Result := '/usr/bin/lldb';
{$ENDIF}
end;
constructor TLldbDebugger.Create(const AExternalDebugger: String); constructor TLldbDebugger.Create(const AExternalDebugger: String);
begin begin
inherited Create(AExternalDebugger); inherited Create(AExternalDebugger);