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         [AttributeUsage (AttributeTargets.Field | AttributeTargets.Parameter, Inherited=false)]
  38         [ComVisible(true)]
  39         public sealed class DecimalConstantAttribute : Attribute
  40         {
  41                 byte scale;
  42                 bool sign;
  43                 int hi;
  44                 int mid;
  45                 int low;
  46
  47                 [CLSCompliant (false)]
  48                 public DecimalConstantAttribute (byte scale, byte sign, uint hi, uint mid, uint low)
  49                 {
  50                         this.scale = scale;
  51                         this.sign  = Convert.ToBoolean (sign);
  52                         this.hi    = (int) hi;
  53                         this.mid   = (int) mid;
  54                         this.low   = (int) low;
  55                 }
  56
  57                 public DecimalConstantAttribute (byte scale, byte sign, int hi, int mid, int low)
  58                 {
  59                         this.scale = scale;
  60                         this.sign  = Convert.ToBoolean (sign);
  61                         this.hi    = hi;
  62                         this.mid   = mid;
  63                         this.low   = low;
  64                 }
  65
  66                 public Decimal Value {
  67                         get { return new Decimal (low, mid, hi, sign, scale); }
  68                 }
  69         }
  70 }