X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mcs%2Fmcs%2Ftypespec.cs;h=c6eaeac7b9590d96671ded434d06d9294f69bc30;hb=732841a4f171062563a831fb8cd3165be1ddfd6e;hp=2a4b8a06bad466ffe48cbad1d1739a31263082b3;hpb=0900c61969ca862b0bcc967b4413e539acf07dbb;p=mono.git

diff --git a/mcs/mcs/typespec.cs b/mcs/mcs/typespec.cs
index 2a4b8a06bad..c6eaeac7b95 100644
--- 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;