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

codetools: FindExpressionTypeOfTerm fixed searching start of term

Browse Source 
git-svn-id: trunk@22391 -
This commit is contained in:
mattias 2009-11-03 00:40:57 +00:00
parent 5687aefd2c
commit 61560943a1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/finddeclarationtool.pas
View File

@ -6048,7 +6048,7 @@ var
begin
Result:=false;
if StartPos<1 then
StartPos:=FindStartOfTerm(EndPos,NodeTermInType(Params.ContextNode))
StartPos:=FindStartOfTerm(EndPos-1,NodeTermInType(Params.ContextNode))
else if EndPos<1 then
EndPos:=FindEndOfTerm(StartPos,true,WithAsOperator);
if (StartPos<1) then