paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-10 05:16:48 +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;
// search base type of property
TypeContext:=Params.NewCodeTool.FindBaseTypeOfNode(Params,PropNode);
debugln(['TEventsCodeTool.FindTypeOfPropertyInfo ',FindContextToString(TypeContext)]);
//debugln(['TEventsCodeTool.FindTypeOfPropertyInfo ',FindContextToString(TypeContext)]);
Result:=true;
finally
Params.Free;

2
components/codetools/finddeclarationtool.pas
View File

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