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