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

FpDebug: remove unused Count

Browse Source 
git-svn-id: trunk@61725 -
This commit is contained in:
martin 2019-08-18 13:43:50 +00:00
parent eb8b6c7704
commit 936f07e67a
1 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/fpdebug/fpdbginfo.pas
View File

@ -351,7 +351,6 @@ type
// NOT cached fields
function GetChild({%H-}AIndex: Integer): TFpSymbol; virtual;
function GetColumn: Cardinal; virtual;
function GetCount: Integer; virtual;
function GetFile: String; virtual;
function GetFlags: TDbgSymbolFlags; virtual;
function GetLine: Cardinal; virtual;
@ -427,7 +426,6 @@ type
property MemberByName[AIndex: String]: TFpSymbol read GetMemberByName; // Includes inheritance
//
property Flags: TDbgSymbolFlags read GetFlags;
property Count: Integer read GetCount; deprecated 'use MemberCount instead';
property Parent: TFpSymbol read GetParent; deprecated;
// for Subranges // Type-Symbols only?
// TODO: flag bounds as cardinal if needed
@ -1164,11 +1162,6 @@ begin
Result := 0;
end;
function TFpSymbol.GetCount: Integer;
begin
Result := 0;
end;
function TFpSymbol.GetFile: String;
begin
Result := '';