2010-04-29 Marek Safar <marek.safar@gmail.com>

[mono.git] / mcs / mcs / typespec.cs

diff --git a/mcs/mcs/typespec.cs b/mcs/mcs/typespec.cs
index 2a4b8a06bad466ffe48cbad1d1739a31263082b3..c6eaeac7b9590d96671ded434d06d9294f69bc30 100644 (file)
--- a/mcs/mcs/typespec.cs
+++ b/mcs/mcs/typespec.cs
@@ -869,6 +869,22 @@ namespace Mono.CSharp
                        return ctor;
                }
 
+               public System.Reflection.MethodInfo GetAddressMethod ()
+               {
+                       var mb = RootContext.ToplevelTypes.Builder;
+
+                       var arg_types = new Type[rank];
+                       for (int i = 0; i < rank; i++)
+                               arg_types[i] = TypeManager.int32_type.GetMetaInfo ();
+
+                       var address = mb.GetArrayMethod (
+                               GetMetaInfo (), "Address",
+                               System.Reflection.CallingConventions.HasThis | System.Reflection.CallingConventions.Standard,
+                               ReferenceContainer.MakeType (Element).GetMetaInfo (), arg_types);
+
+                       return address;
+               }
+
                public System.Reflection.MethodInfo GetGetMethod ()
                {
                        var mb = RootContext.ToplevelTypes.Builder;