1
//-----------------------------------------------------------------------------
3 // Copyright (C) Microsoft Corporation. All Rights Reserved.
5 //-----------------------------------------------------------------------------
7 using System
.Runtime
.InteropServices
;
9 namespace Microsoft
.Cci
.Pdb
{
10 internal class PdbConstant
{
13 internal object value;
15 internal PdbConstant(BitAccess bits
) {
16 bits
.ReadUInt32(out this.token
);
18 bits
.ReadUInt8(out tag1
);
20 bits
.ReadUInt8(out tag2
);
23 } else if (tag2
== 0x80) {
27 bits
.ReadInt16(out s
);
32 bits
.ReadUInt16(out us
);
37 bits
.ReadInt32(out i
);
42 bits
.ReadUInt32(out ui
);
46 this.value = bits
.ReadFloat();
49 this.value = bits
.ReadDouble();
53 bits
.ReadInt64(out sl
);
58 bits
.ReadUInt64(out ul
);
63 bits
.ReadBString(out str
);
67 this.value = bits
.ReadDecimal();
76 bits
.ReadCString(out name
);