fcl-passrc: clean up

git-svn-id: trunk@42896 -

packages/fcl-passrc/src/pasresolver.pp

@@ -20161,7 +20161,6 @@ var
   AncestorScope, HelperScope: TPasClassScope;
   C: TClass;
 begin
-  writeln('AAA1 TPasResolver.GroupScope_AddTypeAndAncestors ',GetObjName(HiType));
   HiType:=ResolveAliasType(HiType,false);
   LoType:=ResolveAliasType(HiType);
   IsClass:=LoType.ClassType=TPasClassType;