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

codetools: GetValuesOfCaseVariable: WithTypeDefIfScoped default true

Browse Source 
git-svn-id: trunk@56168 -
This commit is contained in:
mattias 2017-10-23 11:22:39 +00:00
parent f424cce57e
commit eee3db1cf7
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/codetoolmanager.pas
View File

@ -513,7 +513,7 @@ type
out ListOfPCodeXYPosition: TFPList;
SkipAbstractsInStartClass: boolean = false): boolean;
function GetValuesOfCaseVariable(Code: TCodeBuffer; X,Y: integer;
List: TStrings; WithTypeDefIfScoped: boolean): boolean;
List: TStrings; WithTypeDefIfScoped: boolean = true): boolean;
function GatherOverloads(Code: TCodeBuffer; X,Y: integer;
out Graph: TDeclarationOverloadsGraph): boolean;

2
components/codetools/identcompletiontool.pas
View File

@ -434,7 +434,7 @@ type
out ListOfPCodeXYPosition: TFPList;
SkipAbstractsInStartClass: boolean = false): boolean;
function GetValuesOfCaseVariable(const CursorPos: TCodeXYPosition;
List: TStrings; WithTypeDefIfScoped: boolean): boolean;
List: TStrings; WithTypeDefIfScoped: boolean = true): boolean;
property Beautifier: TBeautifyCodeOptions read FBeautifier write FBeautifier;
procedure CalcMemSize(Stats: TCTMemStats); override;