1'
2' Visual Basic.Net Compiler
3' Copyright (C) 2004 - 2010 Rolf Bjarne Kvinge, RKvinge@novell.com
4'
5' This library is free software; you can redistribute it and/or
6' modify it under the terms of the GNU Lesser General Public
7' License as published by the Free Software Foundation; either
8' version 2.1 of the License, or (at your option) any later version.
9'
10' This library is distributed in the hope that it will be useful,
11' but WITHOUT ANY WARRANTY; without even the implied warranty of
12' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13' Lesser General Public License for more details.
14'
15' You should have received a copy of the GNU Lesser General Public
16' License along with this library; if not, write to the Free Software
17' Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
18'
19
20''' <summary>
21''' This class is added to every enum constant that represents a message
22''' from the compiler
23''' </summary>
24Public Class MessageAttribute
25    Inherits System.Attribute
26
27    ''' <summary>
28    ''' The message level of this message.
29    ''' </summary>
30    Private m_Level As MessageLevel
31
32    ''' <summary>
33    ''' The message level of this message.
34    ''' </summary>
35    ReadOnly Property Level() As MessageLevel
36        Get
37            Return m_Level
38        End Get
39    End Property
40
41    ''' <summary>
42    ''' Creates a new message attribute with the specified message level.
43    ''' </summary>
44    Sub New(ByVal Level As MessageLevel)
45        m_Level = Level
46    End Sub
47End Class