**** Merged from MCS ****
[mono-project.git] / mcs / class / corlib / System.Runtime.InteropServices / MarshalAsAttribute.cs
blob4c7695e2b167c74ee07f43ea19b6d65a09f8d902
1 //
2 // System.Runtime.InteropServices.MarshalAsAttribute.cs
3 //
4 // Author:
5 // Andreas Nahr (ClassDevelopment@A-SoftTech.com)
6 //
8 //
9 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 //
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 //
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
31 using System;
33 namespace System.Runtime.InteropServices {
35 [AttributeUsage (AttributeTargets.Field | AttributeTargets.Parameter |
36 AttributeTargets.ReturnValue, Inherited=false)]
37 public sealed class MarshalAsAttribute : Attribute {
38 private UnmanagedType utype;
39 public UnmanagedType ArraySubType;
40 public string MarshalCookie;
41 public string MarshalType;
42 public Type MarshalTypeRef;
43 public VarEnum SafeArraySubType;
44 public int SizeConst;
45 public short SizeParamIndex;
46 public Type SafeArrayUserDefinedSubType;
47 #if NET_2_0
48 public int IidParamIndex;
49 #endif
51 public MarshalAsAttribute (short unmanagedType) {
52 utype = (UnmanagedType)unmanagedType;
54 public MarshalAsAttribute( UnmanagedType unmanagedType) {
55 utype = unmanagedType;
57 public UnmanagedType Value {
58 get {return utype;}