implemented Enums

git-svn-id: svn://svn.sharpdevelop.net/sharpdevelop/branches/vbnet@6137 1ccf3a8d-04fe-1044-b7c0-cef0b8235c61
16 years ago · 155eb1a698
2 changed files with 2783 additions and 2693 deletions
--- a/src/Libraries/NRefactory/Project/Src/Lexer/VBNet/ExpressionFinder.atg
+++ b/src/Libraries/NRefactory/Project/Src/Lexer/VBNet/ExpressionFinder.atg
@ -312,7 +312,8 @@ TypeDeclaration =
				@@ -312,7 +312,8 @@ TypeDeclaration =
 	{ AttributeBlock }
 	{ TypeModifier }
 	( ClassOrModuleOrStructureTypeDeclaration |
-	DelegateTypeDeclaration )
+	DelegateTypeDeclaration |
+	EnumTypeDeclaration )
 .

 ClassOrModuleOrStructureTypeDeclaration =
@ -326,6 +327,12 @@ ClassOrModuleOrStructureTypeDeclaration =
				@@ -326,6 +327,12 @@ ClassOrModuleOrStructureTypeDeclaration =
 	(. PopContext(); .)
 .

+EnumTypeDeclaration =
+	"Enum" Identifier [ "As" TypeName ] StatementTerminator
+	{ { AttributeBlock } Identifier [ "=" Expression ] StatementTerminator }
+	"End" "Enum" StatementTerminator
+.
+
 GenericConstraint =
 	TypeName | "New" | "Class" | "Structure"
 .
--- a/src/Libraries/NRefactory/Project/Src/Lexer/VBNet/Parser.cs
+++ b/src/Libraries/NRefactory/Project/Src/Lexer/VBNet/Parser.cs