From 32adb07f4cdfd5f7f5ae748faaf162b53417ee8a Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Mon, 24 Mar 2014 22:29:25 +0000
Subject: [PATCH] Codetools: Prevent a wrong error message about ancestor
 having same name. Issue #24502, patch from ocean.

git-svn-id: trunk@44513 -
---
 components/codetools/finddeclarationtool.pas | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/components/codetools/finddeclarationtool.pas b/components/codetools/finddeclarationtool.pas
index 3d813b4204..68e80468fc 100644
--- a/components/codetools/finddeclarationtool.pas
+++ b/components/codetools/finddeclarationtool.pas
@@ -5768,13 +5768,6 @@ begin
     AtomIsIdentifierE;
     AncestorStartPos:=CurPos.StartPos;
   end;
-  if (ClassIdentNode<>nil)
-  and (ClassIdentNode.Desc=ctnTypeDefinition)
-  and (CompareIdentifiers(@Src[AncestorStartPos],@Src[ClassIdentNode.StartPos])=0)
-  then begin
-    MoveCursorToCleanPos(AncestorStartPos);
-    RaiseException('ancestor has same name as class');
-  end;
   {$IFDEF ShowTriedContexts}
   DebugLn('[TFindDeclarationTool.FindAncestorOfClass] ',
   ' search ancestor class = ',GetIdentifier(@Src[AncestorStartPos]));