mcs/mcs/membercache.cs

   1 //
   2 // membercache.cs: A container for all member lookups
   3 //
   4 // Author: Miguel de Icaza (miguel@gnu.org)
   5 //         Marek Safar (marek.safar@gmail.com)
   6 //
   7 // Dual licensed under the terms of the MIT X11 or GNU GPL
   8 //
   9 // Copyright 2001 Ximian, Inc (http://www.ximian.com)
  10 // Copyright 2004-2010 Novell, Inc
  11 //
  12 //
  13
  14 using System;
  15 using System.Collections.Generic;
  16
  17 namespace Mono.CSharp {
  18
  19         [Flags]
  20         public enum MemberKind
  21         {
  22                 Constructor = 1,
  23                 Event = 1 << 1,
  24                 Field = 1 << 2,
  25                 Method = 1 << 3,
  26                 Property = 1 << 4,
  27                 Indexer = 1 << 5,
  28                 Operator = 1 << 6,
  29                 Destructor      = 1 << 7,
  30
  31                 Class           = 1 << 11,
  32                 Struct          = 1 << 12,
  33                 Delegate        = 1 << 13,
  34                 Enum            = 1 << 14,
  35                 Interface       = 1 << 15,
  36                 TypeParameter = 1 << 16,
  37
  38                 ArrayType = 1 << 19,
  39                 PointerType = 1 << 20,
  40                 InternalCompilerType = 1 << 21,
  41
  42                 NestedMask = Class | Struct | Delegate | Enum | Interface,
  43                 GenericMask = Method | Class | Struct | Delegate | Interface,
  44                 MaskType = Constructor | Event | Field | Method | Property | Indexer | Operator | Destructor | NestedMask,
  45                 All = MaskType
  46         }
  47
  48         [Flags]
  49         public enum BindingRestriction
  50         {
  51                 None = 0,
  52
  53                 // Inspect only queried type members
  54                 DeclaredOnly = 1 << 1,
  55
  56                 // Exclude static
  57                 InstanceOnly = 1 << 2,
  58
  59                 NoAccessors = 1 << 3,
  60
  61                 // Member has to be override
  62                 OverrideOnly = 1 << 4
  63         }
  64
  65         public struct MemberFilter : IEquatable<MemberSpec>
  66         {
  67                 public readonly string Name;
  68                 public readonly MemberKind Kind;
  69                 public readonly AParametersCollection Parameters;
  70                 public readonly TypeSpec MemberType;
  71
  72                 int arity; // -1 to ignore the check
  73
  74                 private MemberFilter (string name, MemberKind kind)
  75                 {
  76                         Name = name;
  77                         Kind = kind;
  78                         Parameters = null;
  79                         MemberType = null;
  80                         arity = -1;
  81                 }
  82
  83                 public MemberFilter (MethodSpec m)
  84                 {
  85                         Name = m.Name;
  86                         Kind = MemberKind.Method;
  87                         Parameters = m.Parameters;
  88                         MemberType = m.ReturnType;
  89                         arity = m.Arity;
  90                 }
  91
  92                 public MemberFilter (string name, int arity, MemberKind kind, AParametersCollection param, TypeSpec type)
  93                 {
  94                         Name = name;
  95                         Kind = kind;
  96                         Parameters = param;
  97                         MemberType = type;
  98                         this.arity = arity;
  99                 }
 100
 101                 public static MemberFilter Constructor (AParametersCollection param)
 102                 {
 103                         return new MemberFilter (Mono.CSharp.Constructor.ConstructorName, 0, MemberKind.Constructor, param, null);
 104                 }
 105
 106                 public static MemberFilter Property (string name, TypeSpec type)
 107                 {
 108                         return new MemberFilter (name, 0, MemberKind.Property, null, type);
 109                 }
 110
 111                 public static MemberFilter Field (string name, TypeSpec type)
 112                 {
 113                         return new MemberFilter (name, 0, MemberKind.Field, null, type);
 114                 }
 115
 116                 public static MemberFilter Method (string name, int arity, AParametersCollection param, TypeSpec type)
 117                 {
 118                         return new MemberFilter (name, arity, MemberKind.Method, param, type);
 119                 }
 120
 121                 #region IEquatable<MemberSpec> Members
 122
 123                 public bool Equals (MemberSpec other)
 124                 {
 125                         // Is the member of the correct type ?
 126                         // TODO: Isn't this redundant ?
 127                         if ((other.Kind & Kind & MemberKind.MaskType) == 0)
 128                                 return false;
 129
 130                         // Check arity when not disabled
 131                         if (arity >= 0 && arity != other.Arity)
 132                                 return false;
 133
 134                         if (Parameters != null) {
 135                                 if (other is IParametersMember) {
 136                                         var other_param = ((IParametersMember) other).Parameters;
 137                                         if (!TypeSpecComparer.Override.IsEqual (Parameters, other_param))
 138                                                 return false;
 139                                 } else {
 140                                         return false;
 141                                 }
 142                         }
 143
 144                         if (MemberType != null) {
 145                                 if (other is IInterfaceMemberSpec) {
 146                                         var other_type = ((IInterfaceMemberSpec) other).MemberType;
 147                                         if (!TypeSpecComparer.Override.IsEqual (other_type, MemberType))
 148                                                 return false;
 149                                 } else {
 150                                         return false;
 151                                 }
 152                         }
 153
 154                         return true;
 155                 }
 156
 157                 #endregion
 158         }
 159
 160         //
 161         // The MemberCache is the main members container used by compiler. It contains
 162         // all members imported or defined during compilation using on demand filling
 163         // process. Inflated containers are also using MemberCache to make inflated
 164         // members look like normal definition.
 165         //
 166         // All of the methods are performance and memory sensitive as the MemberCache
 167         // is the underlying engine of all member based operations.
 168         //
 169         public class MemberCache
 170         {
 171                 enum StateFlags
 172                 {
 173                         HasConversionOperator = 1 << 1,
 174                         HasUserOperator = 1 << 2
 175                 }
 176
 177                 readonly Dictionary<string, IList<MemberSpec>> member_hash;
 178                 Dictionary<string, MemberSpec[]> locase_members;
 179                 IList<MethodSpec> missing_abstract;
 180                 StateFlags state;
 181
 182                 public static readonly string IndexerNameAlias = "<this>";
 183
 184                 public static readonly MemberCache Empty = new MemberCache (0);
 185
 186                 public MemberCache ()
 187                         : this (16)
 188                 {
 189                 }
 190
 191                 public MemberCache (int capacity)
 192                 {
 193                         member_hash = new Dictionary<string, IList<MemberSpec>> (capacity);
 194                 }
 195
 196                 public MemberCache (MemberCache cache)
 197                         : this (cache.member_hash.Count)
 198                 {
 199                         this.state = cache.state;
 200                 }
 201
 202                 //
 203                 // Creates a new MemberCache for the given `container'.
 204                 //
 205                 public MemberCache (TypeContainer container)
 206                         : this ()                               // TODO: Optimize the size
 207                 {
 208                 }
 209
 210                 //
 211                 // For cases where we need to union cache members
 212                 //
 213                 public void AddBaseType (TypeSpec baseType)
 214                 {
 215                         var cache = baseType.MemberCache;
 216
 217                         IList<MemberSpec> list;
 218                         foreach (var entry in cache.member_hash) {
 219                                 if (!member_hash.TryGetValue (entry.Key, out list)) {
 220                                         if (entry.Value.Count == 1) {
 221                                                 list = entry.Value;
 222                                         } else {
 223                                                 list = new List<MemberSpec> (entry.Value);
 224                                         }
 225
 226                                         member_hash.Add (entry.Key, list);
 227                                         continue;
 228                                 }
 229
 230                                 foreach (var ce in entry.Value) {
 231                                         if (list.Contains (ce))
 232                                                 continue;
 233
 234                                         list.Add (ce);
 235                                 }
 236                         }
 237                 }
 238
 239                 //
 240                 // Member-cache does not contain base members but it does
 241                 // contain all base interface members, so the Lookup code
 242                 // can use simple inheritance rules.
 243                 //
 244                 public void AddInterface (TypeSpec iface)
 245                 {
 246                         var cache = iface.MemberCache;
 247
 248                         IList<MemberSpec> list;
 249                         foreach (var entry in cache.member_hash) {
 250                                 if (!member_hash.TryGetValue (entry.Key, out list)) {
 251                                         if (entry.Value.Count == 1) {
 252                                                 list = entry.Value;
 253                                         } else {
 254                                                 list = new List<MemberSpec> (entry.Value);
 255                                         }
 256
 257                                         member_hash.Add (entry.Key, list);
 258                                         continue;
 259                                 }
 260
 261                                 foreach (var ce in entry.Value) {
 262                                         if (list.Contains (ce))
 263                                                 continue;
 264
 265                                         if (AddInterfaceMember (ce, ref list))
 266                                                 member_hash[entry.Key] = list;
 267                                 }
 268                         }
 269
 270                         // Add also all base interfaces
 271                         if (iface.Interfaces != null) {
 272                                 foreach (var base_iface in iface.Interfaces)
 273                                         AddInterface (base_iface);
 274                         }
 275                 }
 276
 277                 public void AddMember (InterfaceMemberBase imb, string exlicitName, MemberSpec ms)
 278                 {
 279                         // Explicit names cannot be looked-up but can be used for
 280                         // collision checking (no name mangling needed)
 281                         if (imb.IsExplicitImpl)
 282                                 AddMember (exlicitName, ms);
 283                         else
 284                                 AddMember (ms);
 285                 }
 286
 287                 //
 288                 // Add non-explicit member to member cache
 289                 //
 290                 public void AddMember (MemberSpec ms)
 291                 {
 292                         AddMember (GetLookupName (ms), ms);
 293                 }
 294
 295                 void AddMember (string name, MemberSpec member)
 296                 {
 297                         if (member.Kind == MemberKind.Operator) {
 298                                 var dt = member.DeclaringType;
 299                                 if (dt == TypeManager.string_type || dt == TypeManager.delegate_type || dt == TypeManager.multicast_delegate_type) {
 300                                         // Some core types have user operators but they cannot be used as normal
 301                                         // user operators as they are predefined and therefore having different
 302                                         // rules (e.g. binary operators) by not setting the flag we hide them for
 303                                         // user conversions
 304                                         // TODO: Should I do this for all core types ?
 305                                 } else if (name == Operator.GetMetadataName (Operator.OpType.Implicit) || name == Operator.GetMetadataName (Operator.OpType.Explicit)) {
 306                                         state |= StateFlags.HasConversionOperator;
 307                                 } else {
 308                                         state |= StateFlags.HasUserOperator;
 309                                 }
 310                         }
 311
 312                         IList<MemberSpec> list;
 313                         if (!member_hash.TryGetValue (name, out list)) {
 314                                 member_hash.Add (name, new MemberSpec[] { member });
 315                                 return;
 316                         }
 317
 318                         if (member.DeclaringType.IsInterface) {
 319                                 if (AddInterfaceMember (member, ref list))
 320                                         member_hash[name] = list;
 321                         } else {
 322                                 if (list is MemberSpec[]) {
 323                                         list = new List<MemberSpec> () { list[0] };
 324                                         member_hash[name] = list;
 325                                 }
 326
 327                                 list.Add (member);
 328                         }
 329                 }
 330
 331                 //
 332                 // Ignores any base interface member which can be hidden
 333                 // by this interface
 334                 //
 335                 static bool AddInterfaceMember (MemberSpec member, ref IList<MemberSpec> existing)
 336                 {
 337                         var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : ParametersCompiled.EmptyReadOnlyParameters;
 338
 339                         //
 340                         // interface IA : IB { int Prop { set; } }
 341                         // interface IB { bool Prop { get; } }
 342                         //
 343                         // IB.Prop is never accessible from IA interface
 344                         //
 345                         for (int i = 0; i < existing.Count; ++i) {
 346                                 var entry = existing[i];
 347
 348                                 if (entry.Arity != member.Arity)
 349                                         continue;
 350
 351                                 if (entry is IParametersMember) {
 352                                         var entry_param = ((IParametersMember) entry).Parameters;
 353                                         if (!TypeSpecComparer.Override.IsEqual (entry_param, member_param))
 354                                                 continue;
 355                                 }
 356
 357                                 if (member.DeclaringType.ImplementsInterface (entry.DeclaringType, false)) {
 358                                         if (existing is MemberSpec[]) {
 359                                                 existing = new MemberSpec[] { member };
 360                                                 return true;
 361                                         }
 362
 363                                         existing.RemoveAt (i--);
 364                                         continue;
 365                                 }
 366
 367                                 if ((entry.DeclaringType == member.DeclaringType && entry.IsAccessor == member.IsAccessor) ||
 368                                         entry.DeclaringType.ImplementsInterface (member.DeclaringType, false))
 369                                         return false;
 370                         }
 371
 372                         if (existing is MemberSpec[]) {
 373                                 existing = new List<MemberSpec> () { existing[0], member };
 374                                 return true;
 375                         }
 376
 377                         existing.Add (member);
 378                         return false;
 379                 }
 380
 381                 public static MemberSpec FindMember (TypeSpec container, MemberFilter filter, BindingRestriction restrictions)
 382                 {
 383                         do {
 384                                 IList<MemberSpec> applicable;
 385                                 if (container.MemberCache.member_hash.TryGetValue (filter.Name, out applicable)) {
 386                                         // Start from the end because interface members are in reverse order
 387                                         for (int i = applicable.Count - 1; i >= 0; i--) {
 388                                                 var entry = applicable [i];
 389
 390                                                 if ((restrictions & BindingRestriction.InstanceOnly) != 0 && entry.IsStatic)
 391                                                         continue;
 392
 393                                                 if ((restrictions & BindingRestriction.NoAccessors) != 0 && entry.IsAccessor)
 394                                                         continue;
 395
 396                                                 if ((restrictions & BindingRestriction.OverrideOnly) != 0 && (entry.Modifiers & Modifiers.OVERRIDE) == 0)
 397                                                         continue;
 398
 399                                                 if (!filter.Equals (entry))
 400                                                         continue;
 401
 402                                                 if ((restrictions & BindingRestriction.DeclaredOnly) != 0 && container.IsInterface && entry.DeclaringType != container)
 403                                                         continue;
 404
 405                                                 return entry;
 406                                         }
 407                                 }
 408
 409                                 if ((restrictions & BindingRestriction.DeclaredOnly) != 0)
 410                                         break;
 411
 412                                 container = container.BaseType;
 413                         } while (container != null);
 414
 415                         return null;
 416                 }
 417
 418                 //
 419                 // A special method to work with member lookup only. It returns a list of all members named @name
 420                 // starting from @container. It's very performance sensitive
 421                 //
 422                 public static IList<MemberSpec> FindMembers (TypeSpec container, string name, bool declaredOnly)
 423                 {
 424                         IList<MemberSpec> applicable;
 425
 426                         do {
 427                                 if (container.MemberCache.member_hash.TryGetValue (name, out applicable) || declaredOnly)
 428                                         return applicable;
 429
 430                                 container = container.BaseType;
 431                         } while (container != null);
 432
 433                         return null;
 434                 }
 435
 436                 //
 437                 // Finds the nested type in container
 438                 //
 439                 public static TypeSpec FindNestedType (TypeSpec container, string name, int arity)
 440                 {
 441                         IList<MemberSpec> applicable;
 442                         TypeSpec best_match = null;
 443                         do {
 444                                 // TODO: Don't know how to handle this yet
 445                                 // When resolving base type of nested type, parent type must have
 446                                 // base type resolved to scan full hierarchy correctly
 447                                 // Similarly MemberCacheTypes will inflate BaseType and Interfaces
 448                                 // based on type definition
 449                                 var tc = container.MemberDefinition as TypeContainer;
 450                                 if (tc != null)
 451                                         tc.DefineType ();
 452
 453                                 if (container.MemberCacheTypes.member_hash.TryGetValue (name, out applicable)) {
 454                                         for (int i = applicable.Count - 1; i >= 0; i--) {
 455                                                 var entry = applicable[i];
 456                                                 if ((entry.Kind & MemberKind.NestedMask) == 0)
 457                                                         continue;
 458
 459                                                 var ts = (TypeSpec) entry;
 460                                                 if (arity == ts.Arity)
 461                                                         return ts;
 462
 463                                                 if (arity < 0) {
 464                                                         if (best_match == null) {
 465                                                                 best_match = ts;
 466                                                         } else if (System.Math.Abs (ts.Arity + arity) < System.Math.Abs (ts.Arity + arity)) {
 467                                                                 best_match = ts;
 468                                                         }
 469                                                 }
 470                                         }
 471                                 }
 472
 473                                 container = container.BaseType;
 474                         } while (container != null);
 475
 476                         return best_match;
 477                 }
 478
 479                 //
 480                 // Looks for extension methods with defined name and extension type
 481                 //
 482                 public List<MethodSpec> FindExtensionMethods (TypeContainer invocationType, TypeSpec extensionType, string name, int arity)
 483                 {
 484                         IList<MemberSpec> entries;
 485                         if (!member_hash.TryGetValue (name, out entries))
 486                                 return null;
 487
 488                         List<MethodSpec> candidates = null;
 489                         foreach (var entry in entries) {
 490                                 if (entry.Kind != MemberKind.Method || (arity > 0 && entry.Arity != arity))
 491                                         continue;
 492
 493                                 var ms = (MethodSpec) entry;
 494                                 if (!ms.IsExtensionMethod)
 495                                         continue;
 496
 497                                 if (!ms.IsAccessible (invocationType.CurrentType))
 498                                         continue;
 499
 500                                 if ((ms.DeclaringType.Modifiers & Modifiers.INTERNAL) != 0 && !ms.DeclaringType.MemberDefinition.IsInternalAsPublic (invocationType.DeclaringAssembly))
 501                                         continue;
 502
 503                                 if (candidates == null)
 504                                         candidates = new List<MethodSpec> ();
 505                                 candidates.Add (ms);
 506                         }
 507
 508                         return candidates;
 509                 }
 510
 511                 //
 512                 // Returns base members of @member member if no exact match is found @bestCandidate returns
 513                 // the best match
 514                 //
 515                 public static MemberSpec FindBaseMember (MemberCore member, out MemberSpec bestCandidate)
 516                 {
 517                         bestCandidate = null;
 518                         var container = member.Parent.PartialContainer.Definition;
 519                         if (!container.IsInterface) {
 520                                 container = container.BaseType;
 521
 522                                 // It can happen for a user definition of System.Object
 523                                 if (container == null)
 524                                         return null;
 525                         }
 526
 527                         string name = GetLookupName (member);
 528                         IList<MemberSpec> applicable;
 529                         var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : null;
 530
 531                         var mkind = GetMemberCoreKind (member);
 532                         bool member_with_accessors = mkind == MemberKind.Indexer || mkind == MemberKind.Property;
 533
 534                         do {
 535                                 if (container.MemberCache.member_hash.TryGetValue (name, out applicable)) {
 536                                         for (int i = 0; i < applicable.Count; ++i) {
 537                                                 var entry = applicable [i];
 538
 539                                                 if ((entry.Modifiers & Modifiers.PRIVATE) != 0)
 540                                                         continue;
 541
 542                                                 if ((entry.Modifiers & Modifiers.AccessibilityMask) == Modifiers.INTERNAL &&
 543                                                         !entry.DeclaringType.MemberDefinition.IsInternalAsPublic (member.Module.DeclaringAssembly))
 544                                                         continue;
 545
 546                                                 //
 547                                                 // Is the member of same type ?
 548                                                 //
 549                                                 if ((entry.Kind & ~MemberKind.Destructor & mkind & MemberKind.MaskType) == 0) {
 550                                                         // Destructors are ignored as they cannot be overridden by user
 551                                                         if ((entry.Kind & MemberKind.Destructor) != 0)
 552                                                                 continue;
 553
 554                                                         // Only different arity methods hide
 555                                                         if (mkind != MemberKind.Method && member.MemberName.Arity != entry.Arity)
 556                                                                 continue;
 557
 558                                                         if ((member_param == null || !(entry is IParametersMember))) {
 559                                                                 bestCandidate = entry;
 560                                                                 return null;
 561                                                         }
 562
 563                                                         continue;
 564                                                 }
 565
 566                                                 if (entry.Kind != mkind) {
 567                                                         if (bestCandidate == null)
 568                                                                 bestCandidate = entry;
 569
 570                                                         continue;
 571                                                 }
 572
 573                                                 if (member_param != null) {
 574                                                         // Check arity match
 575                                                         int arity = member.MemberName.Arity;
 576                                                         if (arity != entry.Arity)
 577                                                                 continue;
 578
 579                                                         var pm = entry as IParametersMember;
 580                                                         AParametersCollection entry_parameters;
 581                                                         if (pm == null) {
 582                                                                 if (entry.Kind != MemberKind.Delegate)
 583                                                                         continue;
 584
 585                                                                 // TODO: I don't have DelegateSpec
 586                                                                 entry_parameters = Delegate.GetParameters (member.Compiler, (TypeSpec) entry);
 587                                                         } else {
 588                                                                 entry_parameters = pm.Parameters;
 589                                                         }
 590
 591                                                         if (entry.IsAccessor != member is AbstractPropertyEventMethod)
 592                                                                 continue;
 593
 594                                                         if (!TypeSpecComparer.Override.IsEqual (entry_parameters, member_param))
 595                                                                 continue;
 596                                                 }
 597
 598                                                 //
 599                                                 // Skip override members with accessors they may not fully implement the base member
 600                                                 //
 601                                                 if (member_with_accessors) {
 602                                                         if ((entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.SEALED)) == Modifiers.OVERRIDE) {
 603                                                                 //
 604                                                                 // Set candidate to member override to flag we found an implementation
 605                                                                 //
 606                                                                 bestCandidate = entry;
 607                                                                 continue;
 608                                                         }
 609                                                 } else {
 610                                                         bestCandidate = null;
 611                                                 }
 612
 613                                                 return entry;
 614                                         }
 615                                 }
 616
 617                                 if (container.IsInterface)
 618                                         break;
 619
 620                                 container = container.BaseType;
 621                         } while (container != null);
 622
 623                         return null;
 624                 }
 625
 626                 //
 627                 // Returns inflated version of MemberSpec, it works similarly to
 628                 // SRE TypeBuilder.GetMethod
 629                 //
 630                 public static T GetMember<T> (TypeSpec container, T spec) where T : MemberSpec
 631                 {
 632                         IList<MemberSpec> applicable;
 633                         if (container.MemberCache.member_hash.TryGetValue (GetLookupName (spec), out applicable)) {
 634                                 for (int i = applicable.Count - 1; i >= 0; i--) {
 635                                         var entry = applicable[i];
 636                                         if (entry.MemberDefinition == spec.MemberDefinition)
 637                                                 return (T) entry;
 638                                 }
 639                         }
 640
 641                         throw new InternalErrorException ("Missing member `{0}' on inflated type `{1}'",
 642                                 spec.GetSignatureForError (), container.GetSignatureForError ());
 643                 }
 644
 645                 static MemberKind GetMemberCoreKind (MemberCore member)
 646                 {
 647                         if (member is FieldBase)
 648                                 return MemberKind.Field;
 649                         if (member is Indexer)
 650                                 return MemberKind.Indexer;
 651                         if (member is Class)
 652                                 return MemberKind.Class;
 653                         if (member is Struct)
 654                                 return MemberKind.Struct;
 655                         if (member is Destructor)
 656                                 return MemberKind.Destructor;
 657                         if (member is Method)
 658                                 return MemberKind.Method;
 659                         if (member is Property)
 660                                 return MemberKind.Property;
 661                         if (member is EventField)
 662                                 return MemberKind.Event;
 663                         if (member is Interface)
 664                                 return MemberKind.Interface;
 665                         if (member is EventProperty)
 666                                 return MemberKind.Event;
 667                         if (member is Delegate)
 668                                 return MemberKind.Delegate;
 669                         if (member is Enum)
 670                                 return MemberKind.Enum;
 671
 672                         throw new NotImplementedException (member.GetType ().ToString ());
 673                 }
 674
 675                 public static IList<MemberSpec> GetCompletitionMembers (TypeSpec container, string name)
 676                 {
 677                         var matches = new List<MemberSpec> ();
 678                         foreach (var entry in container.MemberCache.member_hash) {
 679                                 foreach (var name_entry in entry.Value) {
 680                                         if (name_entry.IsAccessor)
 681                                                 continue;
 682
 683                                         if ((name_entry.Kind & (MemberKind.Constructor | MemberKind.Destructor | MemberKind.Operator)) != 0)
 684                                                 continue;
 685
 686                                         if (!name_entry.IsAccessible (InternalType.FakeInternalType))
 687                                                 continue;
 688
 689                                         if (name == null || name_entry.Name.StartsWith (name)) {
 690                                                 matches.Add (name_entry);
 691                                         }
 692                                 }
 693                         }
 694
 695                         return matches;
 696                 }
 697
 698                 //
 699                 // Returns members of @iface only, base members are ignored
 700                 //
 701                 public static IList<MethodSpec> GetInterfaceMethods (TypeSpec iface)
 702                 {
 703                         //
 704                         // MemberCache flatten interfaces, therefore in cases like this one
 705                         //
 706                         // interface IA : IB {}
 707                         // interface IB { void Foo () }
 708                         //
 709                         // we would return Foo inside IA which is not expected in this case
 710                         //
 711                         var methods = new List<MethodSpec> ();
 712                         foreach (var entry in iface.MemberCache.member_hash.Values) {
 713                                 foreach (var name_entry in entry) {
 714                                         if (iface == name_entry.DeclaringType) {
 715                                                 if (name_entry.Kind == MemberKind.Method) {
 716                                                         methods.Add ((MethodSpec) name_entry);
 717                                                 }
 718                                         }
 719                                 }
 720                         }
 721
 722                         return methods;
 723                 }
 724
 725                 //
 726                 // Returns all not implememted abstract members inside abstract type
 727                 // NOTE: Returned list is shared and must not be modified
 728                 //
 729                 public static IList<MethodSpec> GetNotImplementedAbstractMethods (TypeSpec type)
 730                 {
 731                         if (type.MemberCache.missing_abstract != null)
 732                                 return type.MemberCache.missing_abstract;
 733
 734                         var abstract_methods = new List<MethodSpec> ();
 735                         List<TypeSpec> hierarchy = null;
 736
 737                         //
 738                         // Stage 1: top-to-bottom scan for abstract members
 739                         //
 740                         var abstract_type = type;
 741                         while (true) {
 742                                 foreach (var entry in abstract_type.MemberCache.member_hash) {
 743                                         foreach (var name_entry in entry.Value) {
 744                                                 if ((name_entry.Modifiers & Modifiers.ABSTRACT) == 0)
 745                                                         continue;
 746
 747                                                 if (name_entry.Kind != MemberKind.Method)
 748                                                         continue;
 749
 750                                                 abstract_methods.Add ((MethodSpec) name_entry);
 751                                         }
 752                                 }
 753
 754                                 var base_type = abstract_type.BaseType;
 755                                 if (!base_type.IsAbstract)
 756                                         break;
 757
 758                                 if (hierarchy == null)
 759                                         hierarchy = new List<TypeSpec> ();
 760
 761                                 hierarchy.Add (abstract_type);
 762                                 abstract_type = base_type;
 763                         }
 764
 765                         int not_implemented_count = abstract_methods.Count;
 766                         if (not_implemented_count == 0 || hierarchy == null) {
 767                                 type.MemberCache.missing_abstract = abstract_methods;
 768                                 return type.MemberCache.missing_abstract;
 769                         }
 770
 771                         //
 772                         // Stage 2: Remove already implemented methods
 773                         //
 774                         foreach (var type_up in hierarchy) {
 775                                 var members = type_up.MemberCache.member_hash;
 776                                 if (members.Count == 0)
 777                                         continue;
 778
 779                                 for (int i = 0; i < abstract_methods.Count; ++i) {
 780                                         var candidate = abstract_methods [i];
 781                                         if (candidate == null)
 782                                                 continue;
 783
 784                                         IList<MemberSpec> applicable;
 785                                         if (!members.TryGetValue (candidate.Name, out applicable))
 786                                                 continue;
 787
 788                                         var filter = new MemberFilter (candidate);
 789                                         foreach (var item in applicable) {
 790                                                 if ((item.Modifiers & (Modifiers.OVERRIDE | Modifiers.VIRTUAL)) == 0)
 791                                                         continue;
 792
 793                                                 if (filter.Equals (item)) {
 794                                                         --not_implemented_count;
 795                                                         abstract_methods [i] = null;
 796                                                         break;
 797                                                 }
 798                                         }
 799                                 }
 800                         }
 801
 802                         if (not_implemented_count == abstract_methods.Count) {
 803                                 type.MemberCache.missing_abstract = abstract_methods;
 804                                 return type.MemberCache.missing_abstract;
 805                         }
 806
 807                         var not_implemented = new MethodSpec[not_implemented_count];
 808                         int counter = 0;
 809                         foreach (var m in abstract_methods) {
 810                                 if (m == null)
 811                                         continue;
 812
 813                                 not_implemented[counter++] = m;
 814                         }
 815
 816                         type.MemberCache.missing_abstract = not_implemented;
 817                         return type.MemberCache.missing_abstract;
 818                 }
 819
 820                 static string GetLookupName (MemberSpec ms)
 821                 {
 822                         if (ms.Kind == MemberKind.Indexer)
 823                                 return IndexerNameAlias;
 824
 825                         if (ms.Kind == MemberKind.Constructor) {
 826                                 if (ms.IsStatic)
 827                                         return Constructor.TypeConstructorName;
 828
 829                                 return Constructor.ConstructorName;
 830                         }
 831
 832                         return ms.Name;
 833                 }
 834
 835                 static string GetLookupName (MemberCore mc)
 836                 {
 837                         if (mc is Indexer)
 838                                 return IndexerNameAlias;
 839
 840                         if (mc is Constructor)
 841                                 return Constructor.ConstructorName;
 842
 843                         return mc.MemberName.Name;
 844                 }
 845
 846                 //
 847                 // Returns all operators declared on container and its base types (until declaredOnly is used)
 848                 //
 849                 public static IList<MemberSpec> GetUserOperator (TypeSpec container, Operator.OpType op, bool declaredOnly)
 850                 {
 851                         IList<MemberSpec> found = null;
 852
 853                         IList<MemberSpec> applicable;
 854                         do {
 855                                 var mc = container.MemberCache;
 856
 857                                 if (((op == Operator.OpType.Implicit || op == Operator.OpType.Explicit) && (mc.state & StateFlags.HasConversionOperator) != 0) ||
 858                                          (mc.state & StateFlags.HasUserOperator) != 0) {
 859
 860                                         if (mc.member_hash.TryGetValue (Operator.GetMetadataName (op), out applicable)) {
 861                                                 int i;
 862                                                 for (i = 0; i < applicable.Count; ++i) {
 863                                                         if (applicable[i].Kind != MemberKind.Operator) {
 864                                                                 break;
 865                                                         }
 866                                                 }
 867
 868                                                 //
 869                                                 // Handles very rare case where a method with same name as operator (op_xxxx) exists
 870                                                 // and we have to resize the applicable list
 871                                                 //
 872                                                 if (i != applicable.Count) {
 873                                                         for (i = 0; i < applicable.Count; ++i) {
 874                                                                 if (applicable[i].Kind != MemberKind.Operator) {
 875                                                                         continue;
 876                                                                 }
 877
 878                                                                 if (found == null) {
 879                                                                         found = new List<MemberSpec> ();
 880                                                                         found.Add (applicable[i]);
 881                                                                 } else {
 882                                                                         var prev = found as List<MemberSpec>;
 883                                                                         if (prev == null) {
 884                                                                                 prev = new List<MemberSpec> (found.Count + 1);
 885                                                                                 prev.AddRange (found);
 886                                                                         }
 887
 888                                                                         prev.Add (applicable[i]);
 889                                                                 }
 890                                                         }
 891                                                 } else {
 892                                                         if (found == null) {
 893                                                                 found = applicable;
 894                                                         } else {
 895                                                                 var merged = found as List<MemberSpec>;
 896                                                                 if (merged == null) {
 897                                                                         merged = new List<MemberSpec> (found.Count + applicable.Count);
 898                                                                         merged.AddRange (found);
 899                                                                         found = merged;
 900                                                                 }
 901
 902                                                                 merged.AddRange (applicable);
 903                                                         }
 904                                                 }
 905                                         }
 906                                 }
 907
 908                                 // BaseType call can be expensive
 909                                 if (declaredOnly)
 910                                         break;
 911
 912                                 container = container.BaseType;
 913                         } while (container != null);
 914
 915                         return found;
 916                 }
 917
 918                 //
 919                 // Inflates all member cache nested types
 920                 //
 921                 public void InflateTypes (MemberCache inflated_cache, TypeParameterInflator inflator)
 922                 {
 923                         foreach (var item in member_hash) {
 924                                 IList<MemberSpec> inflated_members = null;
 925                                 for (int i = 0; i < item.Value.Count; ++i ) {
 926                                         var member = item.Value[i];
 927
 928                                         // FIXME: When inflating members refering nested types before they are inflated
 929                                         if (member == null)
 930                                                 continue;
 931
 932                                         if ((member.Kind & MemberKind.NestedMask) != 0 &&
 933                                                 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
 934                                                 if (inflated_members == null) {
 935                                                         inflated_members = new MemberSpec[item.Value.Count];
 936                                                         inflated_cache.member_hash.Add (item.Key, inflated_members);
 937                                                 }
 938
 939                                                 inflated_members [i] = member.InflateMember (inflator);
 940                                         }
 941                                 }
 942                         }
 943                 }
 944
 945                 //
 946                 // Inflates all open type members, requires InflateTypes to be called before
 947                 //
 948                 public void InflateMembers (MemberCache cacheToInflate, TypeSpec inflatedType, TypeParameterInflator inflator)
 949                 {
 950                         var inflated_member_hash = cacheToInflate.member_hash;
 951                         Dictionary<MemberSpec, MethodSpec> accessor_relation = null;
 952                         List<MemberSpec> accessor_members = null;
 953
 954                         // Copy member specific flags when all members were added
 955                         cacheToInflate.state = state;
 956
 957                         foreach (var item in member_hash) {
 958                                 var members = item.Value;
 959                                 IList<MemberSpec> inflated_members = null;
 960                                 for (int i = 0; i < members.Count; ++i ) {
 961                                         var member = members[i];
 962
 963                                         //
 964                                         // All nested types have been inflated earlier except for
 965                                         // compiler types which are created later and could miss InflateTypes
 966                                         //
 967                                         if ((member.Kind & MemberKind.NestedMask) != 0 &&
 968                                                 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
 969                                                 if (inflated_members == null)
 970                                                         inflated_members = inflated_member_hash[item.Key];
 971
 972                                                 continue;
 973                                         }
 974
 975                                         //
 976                                         // Clone the container first
 977                                         //
 978                                         if (inflated_members == null) {
 979                                                 inflated_members = new MemberSpec [item.Value.Count];
 980                                                 inflated_member_hash.Add (item.Key, inflated_members);
 981                                         }
 982
 983                                         var local_inflator = inflator;
 984
 985                                         if (member.DeclaringType != inflatedType) {
 986                                                 //
 987                                                 // Don't inflate top-level non-generic interface members
 988                                                 // merged into generic interface
 989                                                 //
 990                                                 if (!member.DeclaringType.IsGeneric && !member.DeclaringType.IsNested) {
 991                                                         inflated_members [i] = member;
 992                                                         continue;
 993                                                 }
 994
 995                                                 //
 996                                                 // Needed when inflating flatten interfaces. It inflates
 997                                                 // container type only, type parameters are already done
 998                                                 //
 999                                                 // Handles cases like:
1000                                                 //
1001                                                 // interface I<T> {}
1002                                                 // interface I<U, V> : I<U> {}
1003                                                 //
1004                                                 // class C: I<int, bool> {}
1005                                                 //
1006                                                 var inflated_parent = inflator.Inflate (member.DeclaringType);
1007                                                 if (inflated_parent != inflator.TypeInstance)
1008                                                         local_inflator = new TypeParameterInflator (inflator, inflated_parent);
1009                                         }
1010
1011                                         //
1012                                         // Inflate every member, its parent is now different
1013                                         //
1014                                         var inflated = member.InflateMember (local_inflator);
1015                                         inflated_members [i] = inflated;
1016
1017                                         if (member is PropertySpec || member is EventSpec) {
1018                                                 if (accessor_members == null)
1019                                                         accessor_members = new List<MemberSpec> ();
1020
1021                                                 accessor_members.Add (inflated);
1022                                                 continue;
1023                                         }
1024
1025                                         if (member.IsAccessor) {
1026                                                 if (accessor_relation == null)
1027                                                         accessor_relation = new Dictionary<MemberSpec, MethodSpec> ();
1028                                                 accessor_relation.Add (member, (MethodSpec) inflated);
1029                                         }
1030                                 }
1031                         }
1032
1033                         if (accessor_members != null) {
1034                                 foreach (var member in accessor_members) {
1035                                         var prop = member as PropertySpec;
1036                                         if (prop != null) {
1037                                                 if (prop.Get != null)
1038                                                         prop.Get = accessor_relation[prop.Get];
1039                                                 if (prop.Set != null)
1040                                                         prop.Set = accessor_relation[prop.Set];
1041
1042                                                 continue;
1043                                         }
1044
1045                                         var ev = (EventSpec) member;
1046                                         ev.AccessorAdd = accessor_relation[ev.AccessorAdd];
1047                                         ev.AccessorRemove = accessor_relation[ev.AccessorRemove];
1048                                 }
1049                         }
1050                 }
1051
1052                 //
1053                 // Checks all appropriate container members for CLS compliance
1054                 //
1055                 public void VerifyClsCompliance (TypeSpec container, Report report)
1056                 {
1057                         if (locase_members != null)
1058                                 return;
1059
1060                         if (container.BaseType == null) {
1061                                 locase_members = new Dictionary<string, MemberSpec[]> (member_hash.Count); // StringComparer.OrdinalIgnoreCase);
1062                         } else {
1063                                 container.BaseType.MemberCache.VerifyClsCompliance (container.BaseType, report);
1064                                 locase_members = new Dictionary<string, MemberSpec[]> (container.BaseType.MemberCache.locase_members); //, StringComparer.OrdinalIgnoreCase);
1065                         }
1066
1067                         var is_imported_type = container.MemberDefinition.IsImported;
1068                         foreach (var entry in container.MemberCache.member_hash) {
1069                                 for (int i = 0; i < entry.Value.Count; ++i ) {
1070                                         var name_entry = entry.Value[i];
1071                                         if ((name_entry.Modifiers & (Modifiers.PUBLIC | Modifiers.PROTECTED)) == 0)
1072                                                 continue;
1073
1074                                         if ((name_entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.COMPILER_GENERATED)) != 0)
1075                                                 continue;
1076
1077                                         if ((name_entry.Kind & MemberKind.MaskType) == 0)
1078                                                 continue;
1079
1080                                         if (name_entry.MemberDefinition.IsNotCLSCompliant ())
1081                                             continue;
1082
1083                                         IParametersMember p_a = name_entry as IParametersMember;
1084                                         if (p_a != null && !name_entry.IsAccessor) {
1085                                                 if (!is_imported_type) {
1086                                                         var p_a_pd = p_a.Parameters;
1087                                                         for (int ii = i + 1; ii < entry.Value.Count; ++ii) {
1088                                                                 var checked_entry = entry.Value[ii];
1089                                                                 IParametersMember p_b = checked_entry as IParametersMember;
1090                                                                 if (p_b == null)
1091                                                                         continue;
1092
1093                                                                 if (p_a_pd.Count != p_b.Parameters.Count)
1094                                                                         continue;
1095
1096                                                                 if (checked_entry.IsAccessor)
1097                                                                         continue;
1098
1099                                                                 var res = ParametersCompiled.IsSameClsSignature (p_a.Parameters, p_b.Parameters);
1100                                                                 if (res != 0) {
1101                                                                         var last = GetLaterDefinedMember (checked_entry, name_entry);
1102                                                                         if (last == checked_entry.MemberDefinition) {
1103                                                                                 report.SymbolRelatedToPreviousError (name_entry);
1104                                                                         } else {
1105                                                                                 report.SymbolRelatedToPreviousError (checked_entry);
1106                                                                         }
1107
1108                                                                         if ((res & 1) != 0) {
1109                                                                                 report.Warning (3006, 1, last.Location,
1110                                                                                                 "Overloaded method `{0}' differing only in ref or out, or in array rank, is not CLS-compliant",
1111                                                                                                 name_entry.GetSignatureForError ());
1112                                                                         }
1113
1114                                                                         if ((res & 2) != 0) {
1115                                                                                 report.Warning (3007, 1, last.Location,
1116                                                                                         "Overloaded method `{0}' differing only by unnamed array types is not CLS-compliant",
1117                                                                                         name_entry.GetSignatureForError ());
1118                                                                         }
1119                                                                 }
1120                                                         }
1121                                                 }
1122                                         }
1123
1124                                         if (i > 0 || name_entry.Kind == MemberKind.Constructor || name_entry.Kind == MemberKind.Indexer)
1125                                                 continue;
1126
1127                                         var name_entry_locase = name_entry.Name.ToLowerInvariant ();
1128
1129                                         MemberSpec[] found;
1130                                         if (!locase_members.TryGetValue (name_entry_locase, out found)) {
1131                                                 found = new MemberSpec[] { name_entry };
1132                                                 locase_members.Add (name_entry_locase, found);
1133                                         } else {
1134                                                 bool same_names_only = true;
1135                                                 foreach (var f in found) {
1136                                                         if (f.Name == name_entry.Name)
1137                                                                 continue;
1138
1139 //                                                      if (f.IsAccessor && name_entry.IsAccessor)
1140 //                                                              continue;
1141
1142                                                         same_names_only = false;
1143                                                         if (!is_imported_type) {
1144                                                                 var last = GetLaterDefinedMember (f, name_entry);
1145                                                                 if (last == f.MemberDefinition) {
1146                                                                         report.SymbolRelatedToPreviousError (name_entry);
1147                                                                 } else {
1148                                                                         report.SymbolRelatedToPreviousError (f);
1149                                                                 }
1150
1151                                                                 report.Warning (3005, 1, last.Location,
1152                                                                         "Identifier `{0}' differing only in case is not CLS-compliant", last.GetSignatureForError ());
1153                                                         }
1154                                                 }
1155
1156                                                 if (!same_names_only) {
1157                                                         Array.Resize (ref found, found.Length + 1);
1158                                                         found[found.Length - 1] = name_entry;
1159                                                         locase_members[name_entry_locase] = found;
1160                                                 }
1161                                         }
1162                                 }
1163                         }
1164                 }
1165
1166                 //
1167                 // Local report helper to issue correctly ordered members stored in hashtable
1168                 //
1169                 static MemberCore GetLaterDefinedMember (MemberSpec a, MemberSpec b)
1170                 {
1171                         var mc_a = a.MemberDefinition as MemberCore;
1172                         var mc_b = b.MemberDefinition as MemberCore;
1173                         if (mc_a == null)
1174                                 return mc_b;
1175
1176                         if (mc_b == null)
1177                                 return mc_a;
1178
1179                         if (mc_a.Location.File != mc_a.Location.File)
1180                                 return mc_b;
1181
1182                         return mc_b.Location.Row > mc_a.Location.Row ? mc_b : mc_a;
1183                 }
1184
1185                 public bool CheckExistingMembersOverloads (MemberCore member, AParametersCollection parameters)
1186                 {
1187                         var name = GetLookupName (member);
1188                         var imb = member as InterfaceMemberBase;
1189                         if (imb != null && imb.IsExplicitImpl) {
1190                                 name = imb.GetFullName (name);
1191                         }
1192
1193                         return CheckExistingMembersOverloads (member, name, parameters);
1194                 }
1195
1196                 public bool CheckExistingMembersOverloads (MemberCore member, string name, AParametersCollection parameters)
1197                 {
1198                         IList<MemberSpec> entries;
1199                         if (!member_hash.TryGetValue (name, out entries))
1200                                 return false;
1201
1202                         var Report = member.Compiler.Report;
1203
1204                         int method_param_count = parameters.Count;
1205                         for (int i = entries.Count - 1; i >= 0; --i) {
1206                                 var ce = entries[i];
1207                                 var pm = ce as IParametersMember;
1208                                 var pd = pm == null ? ParametersCompiled.EmptyReadOnlyParameters : pm.Parameters;
1209                                 if (pd.Count != method_param_count)
1210                                         continue;
1211
1212                                 if (ce.Arity != member.MemberName.Arity)
1213                                         continue;
1214
1215                                 // Ignore merged interface members
1216                                 if (member.Parent.PartialContainer != ce.DeclaringType.MemberDefinition)
1217                                         continue;
1218
1219                                 var p_types = pd.Types;
1220                                 if (method_param_count > 0) {
1221                                         int ii = method_param_count - 1;
1222                                         TypeSpec type_a, type_b;
1223                                         do {
1224                                                 type_a = parameters.Types [ii];
1225                                                 type_b = p_types [ii];
1226
1227                                                 if ((pd.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF) !=
1228                                                         (parameters.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF))
1229                                                         break;
1230
1231                                         } while (TypeSpecComparer.Override.IsEqual (type_a, type_b) && ii-- != 0);
1232
1233                                         if (ii >= 0)
1234                                                 continue;
1235
1236                                         //
1237                                         // Operators can differ in return type only
1238                                         //
1239                                         if (member is Operator && ce.Kind == MemberKind.Operator && ((MethodSpec) ce).ReturnType != ((Operator) member).ReturnType)
1240                                                 continue;
1241
1242                                         //
1243                                         // Report difference in parameter modifiers only
1244                                         //
1245                                         if (pd != null && member is MethodCore) {
1246                                                 ii = method_param_count;
1247                                                 while (ii-- != 0 && parameters.FixedParameters[ii].ModFlags == pd.FixedParameters[ii].ModFlags &&
1248                                                         parameters.ExtensionMethodType == pd.ExtensionMethodType) ;
1249
1250                                                 if (ii >= 0) {
1251                                                         var mc = ce as MethodSpec;
1252                                                         member.Compiler.Report.SymbolRelatedToPreviousError (ce);
1253                                                         if ((member.ModFlags & Modifiers.PARTIAL) != 0 && (mc.Modifiers & Modifiers.PARTIAL) != 0) {
1254                                                                 if (parameters.HasParams || pd.HasParams) {
1255                                                                         Report.Error (758, member.Location,
1256                                                                                 "A partial method declaration and partial method implementation cannot differ on use of `params' modifier");
1257                                                                 } else {
1258                                                                         Report.Error (755, member.Location,
1259                                                                                 "A partial method declaration and partial method implementation must be both an extension method or neither");
1260                                                                 }
1261                                                         } else if (member is Constructor) {
1262                                                                 Report.Error (851, member.Location,
1263                                                                         "Overloaded contructor `{0}' cannot differ on use of parameter modifiers only",
1264                                                                         member.GetSignatureForError ());
1265                                                         } else {
1266                                                                 Report.Error (663, member.Location,
1267                                                                         "Overloaded method `{0}' cannot differ on use of parameter modifiers only",
1268                                                                         member.GetSignatureForError ());
1269                                                         }
1270                                                         return false;
1271                                                 }
1272                                         }
1273                                 }
1274
1275                                 if ((ce.Kind & MemberKind.Method) != 0) {
1276                                         Method method_a = member as Method;
1277                                         Method method_b = ce.MemberDefinition as Method;
1278                                         if (method_a != null && method_b != null && (method_a.ModFlags & method_b.ModFlags & Modifiers.PARTIAL) != 0) {
1279                                                 const Modifiers partial_modifiers = Modifiers.STATIC | Modifiers.UNSAFE;
1280                                                 if (method_a.IsPartialDefinition == method_b.IsPartialImplementation) {
1281                                                         if ((method_a.ModFlags & partial_modifiers) == (method_b.ModFlags & partial_modifiers) ||
1282                                                                 method_a.Parent.IsUnsafe && method_b.Parent.IsUnsafe) {
1283                                                                 if (method_a.IsPartialImplementation) {
1284                                                                         method_a.SetPartialDefinition (method_b);
1285                                                                         if (entries.Count == 1)
1286                                                                                 member_hash.Remove (name);
1287                                                                         else
1288                                                                                 entries.RemoveAt (i);
1289                                                                 } else {
1290                                                                         method_b.SetPartialDefinition (method_a);
1291                                                                         method_a.caching_flags |= MemberCore.Flags.PartialDefinitionExists;
1292                                                                 }
1293                                                                 continue;
1294                                                         }
1295
1296                                                         if (method_a.IsStatic != method_b.IsStatic) {
1297                                                                 Report.SymbolRelatedToPreviousError (ce);
1298                                                                 Report.Error (763, member.Location,
1299                                                                         "A partial method declaration and partial method implementation must be both `static' or neither");
1300                                                         }
1301
1302                                                         Report.SymbolRelatedToPreviousError (ce);
1303                                                         Report.Error (764, member.Location,
1304                                                                 "A partial method declaration and partial method implementation must be both `unsafe' or neither");
1305                                                         return false;
1306                                                 }
1307
1308                                                 Report.SymbolRelatedToPreviousError (ce);
1309                                                 if (method_a.IsPartialDefinition) {
1310                                                         Report.Error (756, member.Location, "A partial method `{0}' declaration is already defined",
1311                                                                 member.GetSignatureForError ());
1312                                                 }
1313
1314                                                 Report.Error (757, member.Location, "A partial method `{0}' implementation is already defined",
1315                                                         member.GetSignatureForError ());
1316                                                 return false;
1317                                         }
1318
1319                                         Report.SymbolRelatedToPreviousError (ce);
1320
1321                                         bool is_reserved_a = member is AbstractPropertyEventMethod || member is Operator;
1322                                         bool is_reserved_b = ((MethodSpec) ce).IsReservedMethod;
1323
1324                                         if (is_reserved_a || is_reserved_b) {
1325                                                 Report.Error (82, member.Location, "A member `{0}' is already reserved",
1326                                                         is_reserved_a ?
1327                                                         ce.GetSignatureForError () :
1328                                                         member.GetSignatureForError ());
1329                                                 return false;
1330                                         }
1331                                 } else {
1332                                         Report.SymbolRelatedToPreviousError (ce);
1333                                 }
1334
1335                                 if (member is Operator && ce.Kind == MemberKind.Operator) {
1336                                         Report.Error (557, member.Location, "Duplicate user-defined conversion in type `{0}'",
1337                                                 member.Parent.GetSignatureForError ());
1338                                         return false;
1339                                 }
1340
1341                                 Report.Error (111, member.Location,
1342                                         "A member `{0}' is already defined. Rename this member or use different parameter types",
1343                                         member.GetSignatureForError ());
1344                                 return false;
1345                         }
1346
1347                         return true;
1348                 }
1349         }
1350 }