2002-07-23 Duncan Mak <duncan@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 using System;
9
10 namespace System.Runtime.CompilerServices {
11
12         [Serializable] [CLSCompliant (false)]
13         [AttributeUsage (AttributeTargets.Field | AttributeTargets.Parameter)]
14         public class DecimalConstantAttribute : Attribute
15         {
16                 byte scale;
17                 bool sign;
18                 int hi;
19                 int mid;
20                 int low;
21                 
22                 public DecimalConstantAttribute (byte scale, byte sign, uint hi, uint mid, uint low)
23                 {
24                         this.scale = scale;
25                         this.sign  = Convert.ToBoolean (sign);
26                         this.hi    = (int) hi;
27                         this.mid   = (int) mid;
28                         this.low   = (int) low;
29                 }
30
31                 public Decimal Value {
32                         get { return new Decimal (low, mid, hi, sign, scale); }
33                 }
34         }
35 }