2002-03-24 Nick Drochak <ndrochak@gol.com>

	* ClassInterfaceAttribute.cs:
	* ClassInterfaceType.cs: New Files.

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

diff --git a/mcs/class/corlib/System.Runtime.InteropServices/ChangeLog b/mcs/class/corlib/System.Runtime.InteropServices/ChangeLog
index 45a805049bba67a0168f50a138feb8c87eae83f5..a6dfd202e298a0c4da7b871bff3bc3f09d3b0887 100644 (file)
--- a/mcs/class/corlib/System.Runtime.InteropServices/ChangeLog
+++ b/mcs/class/corlib/System.Runtime.InteropServices/ChangeLog
@@ -1,3 +1,8 @@
+2002-03-24  Nick Drochak  <ndrochak@gol.com>
+
+       * ClassInterfaceAttribute.cs:
+       * ClassInterfaceType.cs: New Files.
+
 2002-02-27  Duncan Mak  <duncan@ximian.com>
 
        * ExporterEventKind.cs:

diff --git a/mcs/class/corlib/System.Runtime.InteropServices/ClassInterfaceAttribute.cs b/mcs/class/corlib/System.Runtime.InteropServices/ClassInterfaceAttribute.cs
new file mode 100644 (file)
index 0000000..47aa4eb
--- /dev/null
+++ b/mcs/class/corlib/System.Runtime.InteropServices/ClassInterfaceAttribute.cs
@@ -0,0 +1,30 @@
+//
+// System.Runtime.InteropServices.ClassInterfaceAttribute.cs
+//
+// Author:
+//   Nick Drochak (ndrochak@gol.com)
+//
+// (C) 2002 Nick Drochak
+//
+
+using System;
+
+namespace System.Runtime.InteropServices {
+
+       [AttributeUsage(AttributeTargets.Assembly | AttributeTargets.Class)]
+       public sealed class ClassInterfaceAttribute : Attribute {
+               private ClassInterfaceType ciType;
+               
+               public ClassInterfaceAttribute ( short classInterfaceType ) {
+                       ciType = (ClassInterfaceType)classInterfaceType;
+               }
+
+               public ClassInterfaceAttribute ( ClassInterfaceType classInterfaceType ) {
+                       ciType = classInterfaceType;
+               }
+
+               public ClassInterfaceType Value {
+                       get {return ciType;}
+               }
+       }
+}

diff --git a/mcs/class/corlib/System.Runtime.InteropServices/ClassInterfaceType.cs b/mcs/class/corlib/System.Runtime.InteropServices/ClassInterfaceType.cs
new file mode 100644 (file)
index 0000000..963c288
--- /dev/null
+++ b/mcs/class/corlib/System.Runtime.InteropServices/ClassInterfaceType.cs
@@ -0,0 +1,24 @@
+//
+// System.Runtime.InteropServices.ClassInterfaceType.cs
+//
+// Author:
+//   Nick Drochak (ndrochak@gol.com)
+//
+// (C) 2002 Nick Drochak
+//
+
+
+namespace System.Runtime.InteropServices {
+
+       [Serializable]
+       public enum ClassInterfaceType 
+       {
+               None = 0,
+  
+               AutoDispatch = 1,
+ 
+               AutoDual = 2
+
+       } // ClassInterfaceType
+
+} // System.Runtime.InteropServices