From e5de689ab4fc95b9300504250dcbac96b6c3b121 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 11 Oct 2008 07:31:03 +0000
Subject: [PATCH] clean up

git-svn-id: trunk@16953 -
---
 components/codetools/codetoolmanager.pas | 3 ---
 components/codetools/stdcodetools.pas    | 1 -
 2 files changed, 4 deletions(-)

diff --git a/components/codetools/codetoolmanager.pas b/components/codetools/codetoolmanager.pas
index 3c0c568419..f20420402d 100644
--- a/components/codetools/codetoolmanager.pas
+++ b/components/codetools/codetoolmanager.pas
@@ -2613,9 +2613,6 @@ end;
 function TCodeToolManager.AddIncludeDirective(Code: TCodeBuffer;
   const Filename: string; const NewSrc: string
   ): boolean;
-var
-  Tree: TCompilerDirectivesTree;
-  Node: TCodeTreeNode;
 begin
   Result:=false;
   {$IFDEF CTDEBUG}
diff --git a/components/codetools/stdcodetools.pas b/components/codetools/stdcodetools.pas
index 9c77fffaa3..829e2af797 100644
--- a/components/codetools/stdcodetools.pas
+++ b/components/codetools/stdcodetools.pas
@@ -4821,7 +4821,6 @@ end;
 function TStandardCodeTool.FindIncludeDirective(DoBuildTree: boolean;
   var ACleanPos: integer; const Filename: string): boolean;
 var
-  ParamPos: Integer;
   FilenameStartPos: Integer;
   FilenameEndPos: LongInt;
   CommentStart: integer;