diff --git a/components/codetools/pascalparsertool.pas b/components/codetools/pascalparsertool.pas
index cd17db1e0f..bd4f83c789 100644
--- a/components/codetools/pascalparsertool.pas
+++ b/components/codetools/pascalparsertool.pas
@@ -467,7 +467,7 @@ var
 begin
   {$IFDEF MEM_CHECK}CheckHeap('TBasicCodeTool.BuildTree A '+IntToStr(MemCheck_GetMem_Cnt));{$ENDIF}
   {$IFDEF CTDEBUG}
-  DebugLn('TPascalParserTool.BuildTree A');
+  DebugLn('TPascalParserTool.BuildTree A ',MainFilename);
   {$ENDIF}
   ValidateToolDependencies;
   if not UpdateNeeded(OnlyInterfaceNeeded) then begin
@@ -482,7 +482,7 @@ begin
     exit;
   end;
   ClearLastError;
-//  DebugLn('TPascalParserTool.BuildTree B OnlyIntf=',dbgs(OnlyInterfaceNeeded),'  ',TCodeBuffer(Scanner.MainCode).Filename);
+  //DebugLn('TPascalParserTool.BuildTree B OnlyIntf=',dbgs(OnlyInterfaceNeeded),'  ',TCodeBuffer(Scanner.MainCode).Filename);
   //CheckHeap('TBasicCodeTool.BuildTree B '+IntToStr(MemCheck_GetMem_Cnt));
   
   // scan code
diff --git a/ide/sourceeditor.pp b/ide/sourceeditor.pp
index f5ba1dd7fd..9eb41fd742 100644
--- a/ide/sourceeditor.pp
+++ b/ide/sourceeditor.pp
@@ -2458,7 +2458,7 @@ begin
   end;
   {$ENDIF}
   if FCodeBuffer=nil then exit;
-  DebugLn(['TSourceEditor.UpdateCodeBuffer ',FileName]);
+  //DebugLn(['TSourceEditor.UpdateCodeBuffer ',FileName]);
   IncreaseIgnoreCodeBufferLock;
   FEditor.BeginUpdate;
   FCodeBuffer.Assign(FEditor.Lines);