Thu Dec 20 15:46:31 CET 2001 Paolo Molaro <[email protected]>

	* FieldOffsetAttribute.cs, InAttribute.cs, MarshalAsAttribute.cs,
	OptionalAttribute.cs, StructLayoutAttribute.cs, VarEnum.cs:
	more stuff needed by the compiler.

svn path=/trunk/mcs/; revision=1652

mcs/class/corlib/System.Runtime.InteropServices/ChangeLog

@@ -1,4 +1,10 @@
 
+Thu Dec 20 15:46:31 CET 2001 Paolo Molaro <[email protected]>
+
+	* FieldOffsetAttribute.cs, InAttribute.cs, MarshalAsAttribute.cs,
+	OptionalAttribute.cs, StructLayoutAttribute.cs, VarEnum.cs:
+	more stuff needed by the compiler.
+
 Thu Dec 13 20:22:18 CET 2001 Paolo Molaro <[email protected]>
 
 	* DllImportAttribute.cs: added.

mcs/class/corlib/System.Runtime.InteropServices/FieldOffsetAttribute.cs

@@ -0,0 +1,15 @@
+using System;
+
+namespace System.Runtime.InteropServices {
+	public sealed class FieldOffsetAttribute : Attribute {
+		private int val;
+		
+		public FieldOffsetAttribute( int offset) {
+			val = offset;
+		}
+		public int Value {
+			get {return val;}
+		}
+		
+	}
+}

mcs/class/corlib/System.Runtime.InteropServices/InAttribute.cs

@@ -0,0 +1,8 @@
+using System;
+
+namespace System.Runtime.InteropServices {
+	public sealed class InAttribute : Attribute {
+		public InAttribute () {
+		}
+	}
+}

mcs/class/corlib/System.Runtime.InteropServices/MarshalAsAttribute.cs

@@ -0,0 +1,25 @@
+using System;
+
+namespace System.Runtime.InteropServices {
+	public sealed class MarshalAsAttribute : Attribute {
+		private UnmanagedType utype;
+		public UnmanagedType ArraySubType;
+		public string MarshalCookie;
+		public string MarshalType;
+		public Type MarshalTypeRef;
+		public VarEnum SafeArraySubType;
+		public int SizeConst;
+		public short SizeParamIndex;
+
+		public MarshalAsAttribute (short unmanagedType) {
+			utype = (UnmanagedType)unmanagedType;
+		}
+		public MarshalAsAttribute( UnmanagedType unmanagedType) {
+			utype = unmanagedType;
+		}
+		public UnmanagedType Value {
+			get {return utype;}
+		}
+		
+	}
+}

mcs/class/corlib/System.Runtime.InteropServices/OptionalAttribute.cs

@@ -0,0 +1,8 @@
+using System;
+
+namespace System.Runtime.InteropServices {
+	public sealed class OptionalAttribute : Attribute {
+		public OptionalAttribute () {
+		}
+	}
+}

mcs/class/corlib/System.Runtime.InteropServices/StructLayoutAttribute.cs

@@ -0,0 +1,21 @@
+using System;
+
+namespace System.Runtime.InteropServices {
+	public sealed class StructLayoutAttribute : Attribute {
+		public CharSet CharSet = CharSet.Auto;
+		public int Pack = 8;
+		public int Size = 0;
+		private LayoutKind lkind;
+		
+		public StructLayoutAttribute( short layoutKind) {
+			lkind = (LayoutKind)layoutKind;
+		}
+		public StructLayoutAttribute( LayoutKind layoutKind) {
+			lkind = layoutKind;
+		}
+		public LayoutKind Value {
+			get {return lkind;}
+		}
+		
+	}
+}

mcs/class/corlib/System.Runtime.InteropServices/VarEnum.cs

@@ -0,0 +1,50 @@
+using System;
+
+namespace System.Runtime.InteropServices {
+	public enum VarEnum {
+		VT_EMPTY = 0,
+		VT_NULL = 1,
+		VT_I2 = 2,
+		VT_I4 = 3,
+		VT_R4 = 4,
+		VT_R8 = 5,
+		VT_CY = 6,
+		VT_DATE = 7,
+		VT_BSTR = 8,
+		VT_DISPATCH = 9,
+		VT_ERROR = 10,
+		VT_BOOL = 11,
+		VT_VARIANT = 12,
+		VT_UNKNOWN = 13,
+		VT_DECIMAL = 14,
+		VT_I1 = 16,
+		VT_UI1 = 17,
+		VT_UI2 = 18,
+		VT_UI4 = 19,
+		VT_I8 = 20,
+		VT_UI8 = 21,
+		VT_INT = 22,
+		VT_UINT = 23,
+		VT_VOID = 24,
+		VT_HRESULT = 25,
+		VT_PTR = 26,
+		VT_SAFEARRAY = 27,
+		VT_CARRAY = 28,
+		VT_USERDEFINED = 29,
+		VT_LPSTR = 30,
+		VT_LPWSTR = 31,
+		VT_RECORD = 36,
+		VT_FILETIME = 64,
+		VT_BLOB = 65,
+		VT_STREAM = 66,
+		VT_STORAGE = 67,
+		VT_STREAMED_OBJECT = 68,
+		VT_STORED_OBJECT = 69,
+		VT_BLOB_OBJECT = 70,
+		VT_CF = 71,
+		VT_CLSID = 72,
+		VT_VECTOR = 4096,
+		VT_ARRAY = 8192,
+		VT_BYREF = 16384
+	}
+}