2005-01-19 Sureshkumar T <tsureshkumar@novell.com>
[mono.git] / mcs / gmcs / pending.cs
old mode 100755 (executable)
new mode 100644 (file)
index 3308f20..550904b
@@ -34,7 +34,7 @@ namespace Mono.CSharp {
                // Far from ideal, but we want to avoid creating a copy
                // of methods above.
                public Type [][]     args;
-               
+
                //
                // This flag on the method says `We found a match, but
                // because it was private, we could not use the match
@@ -45,6 +45,13 @@ namespace Mono.CSharp {
                // create a proxy for it.  This is used when implementing
                // an interface's indexer with a different IndexerName.
                public MethodInfo [] need_proxy;
+
+               //
+               // The name of the indexer (if it exists), precompute set/get, because
+               // they would be recomputed many times inside a loop later on.
+               //
+               public string set_indexer_name;
+               public string get_indexer_name;
        }
 
        public class PendingImplementation {
@@ -142,22 +149,29 @@ namespace Mono.CSharp {
                                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 (container);
+                                       mi = iface.GetMethods ();
                                } else 
                                        mi = t.GetMethods ();
                                
                                int count = mi.Length;
-                               pending_implementations [i].type = missing.Type;
+                               pending_implementations [i].type = t;
                                pending_implementations [i].optional = missing.Optional;
                                pending_implementations [i].methods = mi;
                                pending_implementations [i].args = new Type [count][];
                                pending_implementations [i].found = new bool [count];
                                pending_implementations [i].need_proxy = new MethodInfo [count];
+                               string indexer_name = TypeManager.IndexerPropertyName (t);
+
+                               pending_implementations [i].set_indexer_name = "set_" + indexer_name;
+                               pending_implementations [i].get_indexer_name = "get_" + indexer_name;
                                
                                int j = 0;
                                foreach (MethodInfo m in mi){
@@ -178,6 +192,10 @@ namespace Mono.CSharp {
                                pending_implementations [i].found = new bool [count];
                                pending_implementations [i].args = new Type [count][];
                                pending_implementations [i].type = type_builder;
+
+                               string indexer_name = TypeManager.IndexerPropertyName (type_builder);
+                               pending_implementations [i].set_indexer_name = "set_" + indexer_name;
+                               pending_implementations [i].get_indexer_name = "get_" + indexer_name;
                                
                                int j = 0;
                                foreach (MemberInfo m in abstract_methods){
@@ -214,7 +232,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;
@@ -222,7 +240,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
@@ -230,11 +248,9 @@ namespace Mono.CSharp {
                        if (type_builder.BaseType == null)
                                return ret;
                        
-                       TypeExpr [] parent_impls = TypeManager.GetInterfaces (type_builder.BaseType);
+                       Type [] parent_impls = TypeManager.GetInterfaces (type_builder.BaseType);
                        
-                       foreach (TypeExpr te in parent_impls) {
-                               Type t = te.Type;
-                                       
+                       foreach (Type t in parent_impls) {
                                for (int i = 0; i < ret.Length; i ++) {
                                        if (t == ret [i].Type) {
                                                ret [i].Optional = true;
@@ -314,7 +330,7 @@ namespace Mono.CSharp {
 
                public void ImplementIndexer (Type t, MethodInfo mi, Type ret_type, Type [] args, bool clear_one) 
                {
-                       InterfaceMethod (t, mi.Name, ret_type, args,
+                       InterfaceMethod (t, null, ret_type, args,
                                         clear_one ? Operation.ClearOne : Operation.ClearAll, mi);
                }
                
@@ -355,12 +371,20 @@ namespace Mono.CSharp {
                                        if (m == null)
                                                continue;
 
+                                       string mname = TypeManager.GetMethodName (m);
+
+                                       //
                                        // `need_proxy' is not null when we're implementing an
                                        // interface indexer and this is Clear(One/All) operation.
+                                       //
                                        // If `name' is null, then we do a match solely based on the
                                        // signature and not on the name (this is done in the Lookup
                                        // for an interface indexer).
-                                       if ((name != null) && (need_proxy == null) && (name != m.Name))
+                                       //
+                                       if (name == null){
+                                               if (mname != tm.get_indexer_name && mname != tm.set_indexer_name)
+                                                       continue;
+                                       } else if ((need_proxy == null) && (name != mname))
                                                continue;
 
                                        if (!TypeManager.IsEqual (ret_type, m.ReturnType)){
@@ -377,7 +401,7 @@ namespace Mono.CSharp {
 
                                        int j, top = args.Length;
                                        bool fail = false;
-                                       
+
                                        for (j = 0; j < top; j++){
                                                if (!TypeManager.IsEqual (tm.args [i][j], args[j])){
                                                        fail = true;
@@ -394,7 +418,11 @@ namespace Mono.CSharp {
                                                // interface indexer.  In this case, we need to create
                                                // a proxy if the implementation's IndexerName doesn't
                                                // match the IndexerName in the interface.
-                                               if ((t == null) && (need_proxy != null) && (name != m.Name))
+                                               bool name_matches = false;
+                                               if (name == mname || mname == tm.get_indexer_name || mname == tm.set_indexer_name)
+                                                       name_matches = true;
+                                               
+                                               if ((t == null) && (need_proxy != null) && !name_matches)
                                                        tm.need_proxy [i] = need_proxy;
                                                else 
                                                        tm.methods [i] = null;
@@ -439,6 +467,14 @@ namespace Mono.CSharp {
                                CallingConventions.Standard | CallingConventions.HasThis,
                                parent_method.ReturnType, args);
 
+                       ParameterData pd = Invocation.GetParameterData (iface_method);
+                       proxy.DefineParameter (0, ParameterAttributes.None, "");
+                       for (int i = 0; i < pd.Count; i++) {
+                               string name = pd.ParameterName (i);
+                               ParameterAttributes attr = Parameter.GetParameterAttributes (pd.ParameterModifier (i));
+                               ParameterBuilder pb = proxy.DefineParameter (i + 1, attr, name);
+                       }
+
                        int top = args.Length;
                        ILGenerator ig = proxy.GetILGenerator ();
 
@@ -499,7 +535,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;
@@ -522,8 +558,11 @@ namespace Mono.CSharp {
                                                
                                                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]);
+                                                       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}'",