Merge pull request #409 from Alkarex/patch-1

[mono.git] / mcs / class / corlib / System.Runtime.InteropServices / MarshalAsAttribute.cs

diff --git a/mcs/class/corlib/System.Runtime.InteropServices/MarshalAsAttribute.cs b/mcs/class/corlib/System.Runtime.InteropServices/MarshalAsAttribute.cs
old mode 100755 (executable)
new mode 100644 (file)
index 4c7695e..ac0dc41
--- a/mcs/class/corlib/System.Runtime.InteropServices/MarshalAsAttribute.cs
+++ b/mcs/class/corlib/System.Runtime.InteropServices/MarshalAsAttribute.cs
@@ -32,21 +32,32 @@ using System;
 
 namespace System.Runtime.InteropServices {
 
+       [ComVisible(true)]
        [AttributeUsage (AttributeTargets.Field | AttributeTargets.Parameter | 
                         AttributeTargets.ReturnValue, Inherited=false)]
+       [StructLayout (LayoutKind.Sequential)]
        public sealed class MarshalAsAttribute : Attribute {
-               private UnmanagedType utype;
-               public UnmanagedType ArraySubType;
+               /*keep these fields in sync with object-internals.h*/
+#pragma warning disable 169, 414
                public string MarshalCookie;
+               [ComVisible(true)]
                public string MarshalType;
+
+               [ComVisible(true)]
                public Type MarshalTypeRef;
+               public Type SafeArrayUserDefinedSubType;
+
+               private UnmanagedType utype;
+               public UnmanagedType ArraySubType;              
+#if !MOONLIGHT
                public VarEnum SafeArraySubType;
+#else
+               private int SafeArraySubType;
+#endif
                public int SizeConst;
+               public int IidParameterIndex;
                public short SizeParamIndex;
-               public Type SafeArrayUserDefinedSubType;
-#if NET_2_0
-               public int IidParamIndex;
-#endif
+#pragma warning disable 169, 414
 
                public MarshalAsAttribute (short unmanagedType) {
                        utype = (UnmanagedType)unmanagedType;
@@ -57,5 +68,10 @@ namespace System.Runtime.InteropServices {
                public UnmanagedType Value {
                        get {return utype;}
                }
+
+               internal MarshalAsAttribute Copy ()
+               {
+                       return (MarshalAsAttribute)this.MemberwiseClone ();
+               }
        }
 }