* mcs/flowanalysis.cs (Reachability.ResetBarrier): Remove.
[mono.git] / mcs / mcs / pending.cs
old mode 100755 (executable)
new mode 100644 (file)
index fb7a98f..c58372f
@@ -23,7 +23,7 @@ namespace Mono.CSharp {
 
                // 
                // Whether it is optional, this is used to allow the explicit/implicit
-               // implementation when a parent class already implements an interface. 
+               // implementation when a base class already implements an interface. 
                //
                // For example:
                //
@@ -35,6 +35,9 @@ namespace Mono.CSharp {
                // of methods above.
                public Type [][]     args;
 
+               //This is used to store the modifiers of arguments
+               public Parameter.Modifier [][] mods;
+               
                //
                // This flag on the method says `We found a match, but
                // because it was private, we could not use the match
@@ -68,7 +71,7 @@ namespace Mono.CSharp {
 
                /// <summary>
                ///   This is the array of TypeAndMethods that describes the pending implementations
-               ///   (both interfaces and abstract methods in parent class)
+               ///   (both interfaces and abstract methods in base class)
                /// </summary>
                TypeAndMethods [] pending_implementations;
 
@@ -88,7 +91,7 @@ namespace Mono.CSharp {
 
                // <remarks>
                //   Returns a list of the abstract methods that are exposed by all of our
-               //   parents that we must implement.  Notice that this `flattens' the
+               //   bases that we must implement.  Notice that this `flattens' the
                //   method search space, and takes into account overrides.  
                // </remarks>
                static ArrayList GetAbstractMethods (Type t)
@@ -102,8 +105,8 @@ namespace Mono.CSharp {
                                
                                mi = TypeContainer.FindMembers (
                                        current_type, MemberTypes.Method,
-                                       BindingFlags.Public | BindingFlags.Instance |
-                                       BindingFlags.DeclaredOnly,
+                                       BindingFlags.Public | BindingFlags.NonPublic |
+                                       BindingFlags.Instance | BindingFlags.DeclaredOnly,
                                        virtual_method_filter, null);
 
                                if (current_type == TypeManager.object_type)
@@ -148,12 +151,15 @@ namespace Mono.CSharp {
                        foreach (MissingInterfacesInfo missing in missing_ifaces){
                                MethodInfo [] mi;
                                Type t = missing.Type;
-                               
+
+                               if (!t.IsInterface)
+                                       continue;
+
                                if (t is TypeBuilder){
-                                       Interface iface;
+                                       TypeContainer iface;
 
                                        iface = TypeManager.LookupInterface (t);
-                                       
+
                                        mi = iface.GetMethods ();
                                } else 
                                        mi = t.GetMethods ();
@@ -163,6 +169,7 @@ namespace Mono.CSharp {
                                pending_implementations [i].optional = missing.Optional;
                                pending_implementations [i].methods = mi;
                                pending_implementations [i].args = new Type [count][];
+                               pending_implementations [i].mods = new Parameter.Modifier [count][];
                                pending_implementations [i].found = new bool [count];
                                pending_implementations [i].need_proxy = new MethodInfo [count];
                                string indexer_name = TypeManager.IndexerPropertyName (t);
@@ -172,9 +179,23 @@ namespace Mono.CSharp {
                                
                                int j = 0;
                                foreach (MethodInfo m in mi){
-                                       Type [] types = TypeManager.GetArgumentTypes (m);
-                                       
-                                       pending_implementations [i].args [j] = types;
+                                       pending_implementations [i].args [j] = Type.EmptyTypes;
+                                       pending_implementations [i].mods [j] = null;
+
+                                       // If there is a previous error, just ignore
+                                       if (m == null)
+                                               continue;
+
+                                       ParameterData pd = TypeManager.GetParameterData (m);
+                                       pending_implementations [i].args [j] = pd.Types;
+                                       
+                                       if (pd.Count > 0){
+                                               Parameter.Modifier [] pm = new Parameter.Modifier [pd.Count];
+                                               for (int k = 0; k < pd.Count; k++)
+                                                       pm [k] = pd.ParameterModifier (k);
+                                               pending_implementations [i].mods [j] = pm;
+                                       }
+                       
                                        j++;
                                }
                                i++;
@@ -188,6 +209,7 @@ namespace Mono.CSharp {
                                abstract_methods.CopyTo (pending_implementations [i].methods, 0);
                                pending_implementations [i].found = new bool [count];
                                pending_implementations [i].args = new Type [count][];
+                               pending_implementations [i].mods = new Parameter.Modifier [count][];
                                pending_implementations [i].type = type_builder;
 
                                string indexer_name = TypeManager.IndexerPropertyName (type_builder);
@@ -198,9 +220,18 @@ namespace Mono.CSharp {
                                foreach (MemberInfo m in abstract_methods){
                                        MethodInfo mi = (MethodInfo) m;
                                        
-                                       Type [] types = TypeManager.GetArgumentTypes (mi);
+                                       ParameterData pd = TypeManager.GetParameterData (mi);
+                                       Type [] types = pd.Types;
                                        
                                        pending_implementations [i].args [j] = types;
+                                       pending_implementations [i].mods [j] = null;
+                                       if (pd.Count > 0){
+                                               Parameter.Modifier [] pm = new Parameter.Modifier [pd.Count];
+                                               for (int k = 0; k < pd.Count; k++)
+                                                       pm [k] = pd.ParameterModifier (k);
+                                               pending_implementations [i].mods [j] = pm;
+                                       }
+                                               
                                        j++;
                                }
                        }
@@ -229,7 +260,7 @@ namespace Mono.CSharp {
                        //
                        // Completely broken.  So we do it ourselves!
                        //
-                       TypeExpr [] impl = TypeManager.GetExplicitInterfaces (type_builder);
+                       Type [] impl = TypeManager.GetExplicitInterfaces (type_builder);
 
                        if (impl == null || impl.Length == 0)
                                return EmptyMissingInterfacesInfo;
@@ -237,7 +268,7 @@ namespace Mono.CSharp {
                        MissingInterfacesInfo [] ret = new MissingInterfacesInfo [impl.Length];
 
                        for (int i = 0; i < impl.Length; i++)
-                               ret [i] = new MissingInterfacesInfo (impl [i].Type);
+                               ret [i] = new MissingInterfacesInfo (impl [i]);
                        
                        // we really should not get here because Object doesnt implement any
                        // interfaces. But it could implement something internal, so we have
@@ -245,11 +276,9 @@ namespace Mono.CSharp {
                        if (type_builder.BaseType == null)
                                return ret;
                        
-                       TypeExpr [] parent_impls = TypeManager.GetInterfaces (type_builder.BaseType);
+                       Type [] base_impls = TypeManager.GetInterfaces (type_builder.BaseType);
                        
-                       foreach (TypeExpr te in parent_impls) {
-                               Type t = te.Type;
-                               
+                       foreach (Type t in base_impls) {
                                for (int i = 0; i < ret.Length; i ++) {
                                        if (t == ret [i].Type) {
                                                ret [i].Optional = true;
@@ -311,23 +340,23 @@ namespace Mono.CSharp {
                /// <summary>
                ///   Whether the specified method is an interface method implementation
                /// </summary>
-               public MethodInfo IsInterfaceMethod (Type t, string name, Type ret_type, Type [] args)
+               public MethodInfo IsInterfaceMethod (Type t, string name, Type ret_type, ParameterData args)
                {
                        return InterfaceMethod (t, name, ret_type, args, Operation.Lookup, null);
                }
 
-               public MethodInfo IsInterfaceIndexer (Type t, Type ret_type, Type [] args)
+               public MethodInfo IsInterfaceIndexer (Type t, Type ret_type, ParameterData args)
                {
                        return InterfaceMethod (t, null, ret_type, args, Operation.Lookup, null);
                }
 
-               public void ImplementMethod (Type t, string name, Type ret_type, Type [] args, bool clear_one) 
+               public void ImplementMethod (Type t, string name, Type ret_type, ParameterData args, bool clear_one) 
                {
                        InterfaceMethod (t, name, ret_type, args,
                                         clear_one ? Operation.ClearOne : Operation.ClearAll, null);
                }
 
-               public void ImplementIndexer (Type t, MethodInfo mi, Type ret_type, Type [] args, bool clear_one) 
+               public void ImplementIndexer (Type t, MethodInfo mi, Type ret_type, ParameterData args, bool clear_one) 
                {
                        InterfaceMethod (t, null, ret_type, args,
                                         clear_one ? Operation.ClearOne : Operation.ClearAll, mi);
@@ -350,10 +379,10 @@ namespace Mono.CSharp {
                ///   that was used in the interface, then we always need to create a proxy for it.
                ///
                /// </remarks>
-               public MethodInfo InterfaceMethod (Type t, string name, Type ret_type, Type [] args,
+               public MethodInfo InterfaceMethod (Type t, string name, Type ret_type, ParameterData args,
                                                   Operation op, MethodInfo need_proxy)
                {
-                       int arg_len = args.Length;
+                       int arg_len = args.Count;
 
                        if (pending_implementations == null)
                                return null;
@@ -384,28 +413,35 @@ namespace Mono.CSharp {
                                        } else if ((need_proxy == null) && (name != m.Name))
                                                continue;
 
-                                       if (ret_type != m.ReturnType){
-                                               if (!((ret_type == null && m.ReturnType == TypeManager.void_type) ||
-                                                     (m.ReturnType == null && ret_type == TypeManager.void_type)))
-                                                       continue;
-                                       }
+                                       if (ret_type != m.ReturnType &&
+                                           !(ret_type == null && m.ReturnType == TypeManager.void_type) &&
+                                           !(m.ReturnType == null && ret_type == TypeManager.void_type))
+                                               continue;
 
                                        //
                                        // Check if we have the same parameters
                                        //
-                                       if (tm.args [i].Length != arg_len)
+
+                                       if (tm.args [i] == null && arg_len != 0)
+                                               continue;
+                                       if (tm.args [i] != null && tm.args [i].Length != arg_len)
                                                continue;
 
-                                       int j, top = args.Length;
-                                       bool fail = false;
-                                       
-                                       for (j = 0; j < top; j++){
-                                               if (tm.args [i][j] != args[j]){
-                                                       fail = true;
+                                       int j;
+
+                                       for (j = 0; j < arg_len; j++) {
+                                               if (tm.args [i][j] != args.ParameterType (j))
+                                                       break;
+                                               if (tm.mods [i][j] == args.ParameterModifier (j))
+                                                       continue;
+                                               // The modifiers are different, but if one of them
+                                               // is a PARAMS modifier, and the other isn't, ignore
+                                               // the difference.
+                                               if (tm.mods [i][j] != Parameter.Modifier.PARAMS &&
+                                                   args.ParameterModifier (j) != Parameter.Modifier.PARAMS)
                                                        break;
-                                               }
                                        }
-                                       if (fail)
+                                       if (j != arg_len)
                                                continue;
 
                                        if (op != Operation.Lookup){
@@ -449,7 +485,7 @@ namespace Mono.CSharp {
                ///   For that case, we create an explicit implementation function
                ///   I.M in Y.
                /// </summary>
-               void DefineProxy (Type iface, MethodInfo parent_method, MethodInfo iface_method,
+               void DefineProxy (Type iface, MethodInfo base_method, MethodInfo iface_method,
                                  Type [] args)
                {
                        MethodBuilder proxy;
@@ -462,40 +498,30 @@ namespace Mono.CSharp {
                                MethodAttributes.NewSlot |
                                MethodAttributes.Virtual,
                                CallingConventions.Standard | CallingConventions.HasThis,
-                               parent_method.ReturnType, args);
+                               base_method.ReturnType, args);
 
                        int top = args.Length;
                        ILGenerator ig = proxy.GetILGenerator ();
 
-                       ig.Emit (OpCodes.Ldarg_0);
-                       for (int i = 0; i < top; i++){
-                               switch (i){
-                               case 0:
-                                       ig.Emit (OpCodes.Ldarg_1); break;
-                               case 1:
-                                       ig.Emit (OpCodes.Ldarg_2); break;
-                               case 2:
-                                       ig.Emit (OpCodes.Ldarg_3); break;
-                               default:
-                                       ig.Emit (OpCodes.Ldarg, i - 1); break;
-                               }
-                       }
-                       ig.Emit (OpCodes.Call, parent_method);
+                       for (int i = 0; i <= top; i++)
+                               ParameterReference.EmitLdArg (ig, i);
+
+                       ig.Emit (OpCodes.Call, base_method);
                        ig.Emit (OpCodes.Ret);
 
                        container.TypeBuilder.DefineMethodOverride (proxy, iface_method);
                }
                
                /// <summary>
-               ///   This function tells whether one of our parent classes implements
+               ///   This function tells whether one of our base classes implements
                ///   the given method (which turns out, it is valid to have an interface
-               ///   implementation in a parent
+               ///   implementation in a base
                /// </summary>
-               bool ParentImplements (Type iface_type, MethodInfo mi)
+               bool BaseImplements (Type iface_type, MethodInfo mi)
                {
                        MethodSignature ms;
                        
-                       Type [] args = TypeManager.GetArgumentTypes (mi);
+                       Type [] args = TypeManager.GetParameterData (mi).Types;
                        ms = new MethodSignature (mi.Name, mi.ReturnType, args);
                        MemberList list = TypeContainer.FindMembers (
                                container.TypeBuilder.BaseType, MemberTypes.Method | MemberTypes.Property,
@@ -505,9 +531,19 @@ namespace Mono.CSharp {
                        if (list.Count == 0)
                                return false;
 
-                       MethodInfo parent = (MethodInfo) list [0];
-                       if (!parent.IsAbstract)
-                               DefineProxy (iface_type, parent, mi, args);
+                       if (TypeManager.ImplementsInterface (container.TypeBuilder.BaseType, iface_type))
+                               return true;
+
+                       //
+                       // FIXME: We should be creating fewer proxies.  The runtime can handle most cases.  
+                       //        At worst, if we can't avoid creating the proxy, we may need to make the 
+                       //        proxy use Callvirt.
+                       //
+                       MethodInfo base_method = (MethodInfo) list [0];
+
+                       if (!base_method.IsAbstract && !base_method.IsVirtual)
+                               DefineProxy (iface_type, base_method, mi, args);
+
                        return true;
                }
 
@@ -524,7 +560,7 @@ namespace Mono.CSharp {
                        for (i = 0; i < top; i++){
                                Type type = pending_implementations [i].type;
                                int j = 0;
-                               
+
                                foreach (MethodInfo mi in pending_implementations [i].methods){
                                        if (mi == null)
                                                continue;
@@ -534,29 +570,39 @@ namespace Mono.CSharp {
                                                        pending_implementations [i].need_proxy [j];
 
                                                if (need_proxy != null) {
-                                                       Type [] args = TypeManager.GetArgumentTypes (mi);
+                                                       Type [] args = TypeManager.GetParameterData (mi).Types;
                                                        DefineProxy (type, need_proxy, mi, args);
                                                        continue;
                                                }
 
-                                               if (ParentImplements (type, mi))
+                                               if (BaseImplements (type, mi))
                                                        continue;
-
+                                               
                                                if (pending_implementations [i].optional)
                                                        continue;
-                                               
+
+                                               Report.SymbolRelatedToPreviousError (mi);
                                                if (pending_implementations [i].found [j]) {
-                                                       string[] methodLabel = TypeManager.CSharpSignature (mi).Split ('.');
-                                                       Report.Error (536, container.Location, "'{0}' does not implement interface member '{1}'. '{2}.{3}' is either static, not public, or has the wrong return type",
-                                                               container.Name, TypeManager.CSharpSignature (mi), container.Name, methodLabel[methodLabel.Length - 1]);
+                                                       if (mi.IsSpecialName) {
+                                                               string name = TypeManager.CSharpName (mi.DeclaringType) + '.' + mi.Name.Substring (4);
+                                                               Report.Error (551, container.Location, "Explicit interface implementation `{0}.{1}' is missing accessor `{2}'",
+                                                                       container.GetSignatureForError (), name, TypeManager.CSharpSignature (mi, true));
+                                                       } else {
+                                                               string[] methodLabel = TypeManager.CSharpSignature (mi).Split ('.');
+                                                               Report.Error (536, container.Location,
+                                                                       "`{0}' does not implement interface member `{1}'. `{2}.{3}' " +
+                                                                       "is either static, not public, or has the wrong return type",
+                                                                       container.Name, TypeManager.CSharpSignature (mi),
+                                                                       container.Name, methodLabel[methodLabel.Length - 1]);
+                                                       }
                                                }
-                                               else { 
-                                                       Report.Error (535, container.Location, "'{0}' does not implement interface member '{1}'",
-                                                               container.Name, TypeManager.CSharpSignature (mi));
+                                               else {
+                                                       Report.Error (535, container.Location, "`{0}' does not implement interface member `{1}'",
+                                                               container.GetSignatureForError (), TypeManager.CSharpSignature (mi));
                                                }
                                        } else {
-                                               Report.Error (534, container.Location, "'{0}' does not implement inherited abstract member '{1}'",
-                                                       container.Name, TypeManager.CSharpSignature (mi));
+                                               Report.Error (534, container.Location, "`{0}' does not implement inherited abstract member `{1}'",
+                                                       container.GetSignatureForError (), TypeManager.CSharpSignature (mi, true));
                                        }
                                        errors = true;
                                        j++;