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

codetools: less verbosity

Browse Source 
git-svn-id: trunk@35727 -
This commit is contained in:
mattias 2012-03-05 11:20:32 +00:00
parent d42de5d07d
commit dd14bccb30
2 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/eventcodetool.pas
View File

@ -1111,7 +1111,7 @@ begin
end; end;
// search base type of property // search base type of property
TypeContext:=Params.NewCodeTool.FindBaseTypeOfNode(Params,PropNode); TypeContext:=Params.NewCodeTool.FindBaseTypeOfNode(Params,PropNode);
debugln(['TEventsCodeTool.FindTypeOfPropertyInfo ',FindContextToString(TypeContext)]); //debugln(['TEventsCodeTool.FindTypeOfPropertyInfo ',FindContextToString(TypeContext)]);
Result:=true; Result:=true;
finally finally
Params.Free; Params.Free;

2
components/codetools/finddeclarationtool.pas
View File

@ -1643,7 +1643,7 @@ var
begin begin
Result:=false; Result:=false;
NewContext:=CleanFindContext; NewContext:=CleanFindContext;
DebugLn('TFindDeclarationTool.FindDeclarationOfPropertyPath ',MainFilename,' PropertyPath="',PropertyPath,'"'); //DebugLn('TFindDeclarationTool.FindDeclarationOfPropertyPath ',MainFilename,' PropertyPath="',PropertyPath,'"');
if PropertyPath='' then exit; if PropertyPath='' then exit;
ActivateGlobalWriteLock; ActivateGlobalWriteLock;
Params:=TFindDeclarationParams.Create; Params:=TFindDeclarationParams.Create;