2007-08-17 Sebastien Pouliot <sebastien@ximian.com>
[mono.git] / mcs / class / corlib / System.Runtime.CompilerServices / DecimalConstantAttribute.cs
1 //
2 // System.Runtime.CompilerServices.DecimalConstantAttribute.cs
3 //
4 // Author: Duncan Mak  (duncan@ximian.com)
5 //
6 // (C) Copyright, Ximian Inc.
7
8 //
9 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
10 //
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.
29 //
30
31 using System;
32 using System.Runtime.InteropServices;
33
34 namespace System.Runtime.CompilerServices {
35
36         [Serializable] 
37 #if !NET_2_0
38         [CLSCompliant (false)]
39 #endif
40         [AttributeUsage (AttributeTargets.Field | AttributeTargets.Parameter,
41                          Inherited=false)]
42 #if NET_2_0
43         [ComVisible(true)]
44 #endif
45         public sealed class DecimalConstantAttribute : Attribute
46         {
47                 byte scale;
48                 bool sign;
49                 int hi;
50                 int mid;
51                 int low;
52
53 #if NET_2_0
54                 [CLSCompliant (false)]
55 #endif
56                 public DecimalConstantAttribute (byte scale, byte sign, uint hi, uint mid, uint low)
57                 {
58                         this.scale = scale;
59                         this.sign  = Convert.ToBoolean (sign);
60                         this.hi    = (int) hi;
61                         this.mid   = (int) mid;
62                         this.low   = (int) low;
63                 }
64
65 #if NET_2_0
66                 public DecimalConstantAttribute (byte scale, byte sign, int hi, int mid, int low)
67                 {
68                         this.scale = scale;
69                         this.sign  = Convert.ToBoolean (sign);
70                         this.hi    = hi;
71                         this.mid   = mid;
72                         this.low   = low;
73                 }
74 #endif
75
76                 public Decimal Value {
77                         get { return new Decimal (low, mid, hi, sign, scale); }
78                 }
79         }
80 }