implement translation of EnumDeclaration

NRefactory/ICSharpCode.NRefactory.VB/Ast/GlobalScope/EnumDeclaration.cs

@@ -22,7 +22,7 @@ namespace ICSharpCode.NRefactory.VB.Ast
 			set { SetChildByRole(UnderlyingTypeRole, value); }
 		}
 		
-		public AstNodeCollection<EnumMemberDeclaration> Member {
+		public AstNodeCollection<EnumMemberDeclaration> Members {
 			get { return GetChildrenByRole(MemberRole); }
 		}
 		
@@ -33,7 +33,7 @@ namespace ICSharpCode.NRefactory.VB.Ast
 				MatchAttributesAndModifiers(decl, match) &&
 				Name.DoMatch(decl.Name, match) &&
 				UnderlyingType.DoMatch(decl.UnderlyingType, match) &&
-				Member.DoMatch(decl.Member, match);
+				Members.DoMatch(decl.Members, match);
 		}
 		
 		public override S AcceptVisitor<T, S>(IAstVisitor<T, S> visitor, T data)

NRefactory/ICSharpCode.NRefactory.VB/OutputVisitor/OutputVisitor.cs

@@ -241,6 +241,7 @@ namespace ICSharpCode.NRefactory.VB
 				case ICSharpCode.NRefactory.TypeSystem.ClassType.Enum:
 					break;
 				case ICSharpCode.NRefactory.TypeSystem.ClassType.Interface:
+					WriteKeyword("Interface");
 					break;
 				case ICSharpCode.NRefactory.TypeSystem.ClassType.Struct:
 					WriteKeyword("Structure");
@@ -262,12 +263,48 @@ namespace ICSharpCode.NRefactory.VB
 		
 		public object VisitEnumDeclaration(EnumDeclaration enumDeclaration, object data)
 		{
-			throw new NotImplementedException();
+			StartNode(enumDeclaration);
+			
+			WriteAttributes(enumDeclaration.Attributes);
+			WriteModifiers(enumDeclaration.ModifierTokens);
+			WriteKeyword("Enum");
+			WriteIdentifier(enumDeclaration.Name.Name);
+			if (!enumDeclaration.UnderlyingType.IsNull) {
+				Space();
+				WriteKeyword("As");
+				enumDeclaration.UnderlyingType.AcceptVisitor(this, data);
+			}
+			NewLine();
+			
+			Indent();
+			foreach (var member in enumDeclaration.Members) {
+				member.AcceptVisitor(this, null);
+			}
+			Unindent();
+			
+			WriteKeyword("End");
+			WriteKeyword("Enum");
+			NewLine();
+			
+			return EndNode(enumDeclaration);
 		}
 		
 		public object VisitEnumMemberDeclaration(EnumMemberDeclaration enumMemberDeclaration, object data)
 		{
-			throw new NotImplementedException();
+			StartNode(enumMemberDeclaration);
+			
+			WriteAttributes(enumMemberDeclaration.Attributes);
+			WriteIdentifier(enumMemberDeclaration.Name.Name);
+			
+			if (!enumMemberDeclaration.Value.IsNull) {
+				Space();
+				WriteToken("=", EnumMemberDeclaration.Roles.Assign);
+				Space();
+				enumMemberDeclaration.Value.AcceptVisitor(this, data);
+			}
+			NewLine();
+			
+			return EndNode(enumMemberDeclaration);
 		}
 		
 		public object VisitDelegateDeclaration(DelegateDeclaration delegateDeclaration, object data)

NRefactory/ICSharpCode.NRefactory.VB/Visitors/CSharpToVBConverterVisitor.cs

@@ -314,6 +314,25 @@ namespace ICSharpCode.NRefactory.VB.Visitors
 		public AstNode VisitTypeDeclaration(CSharp.TypeDeclaration typeDeclaration, object data)
 		{
 			// TODO add missing features!
+			
+			if (typeDeclaration.ClassType == ClassType.Enum) {
+				var type = new EnumDeclaration();
+				
+				ConvertNodes(typeDeclaration.Attributes, type.Attributes);
+				ConvertNodes(typeDeclaration.ModifierTokens, type.ModifierTokens);
+				
+				if (typeDeclaration.BaseTypes.Any()) {
+					var first = typeDeclaration.BaseTypes.First();
+					
+					type.UnderlyingType = (AstType)first.AcceptVisitor(this, data);
+				}
+				
+				type.Name = new Identifier(typeDeclaration.Name, AstLocation.Empty);
+				
+				ConvertNodes(typeDeclaration.Members, type.Members);
+				
+				return EndNode(typeDeclaration, type);
+			} else {
 				var type = new TypeDeclaration();
 				
 				CSharp.Attribute stdModAttr;
@@ -348,6 +367,7 @@ namespace ICSharpCode.NRefactory.VB.Visitors
 				
 				return EndNode(typeDeclaration, type);
 			}
+		}
 		
 		public AstNode VisitUsingAliasDeclaration(CSharp.UsingAliasDeclaration usingAliasDeclaration, object data)
 		{
@@ -565,7 +585,13 @@ namespace ICSharpCode.NRefactory.VB.Visitors
 		
 		public AstNode VisitEnumMemberDeclaration(CSharp.EnumMemberDeclaration enumMemberDeclaration, object data)
 		{
-			throw new NotImplementedException();
+			var result = new EnumMemberDeclaration();
+			
+			ConvertNodes(enumMemberDeclaration.Attributes, result.Attributes);
+			result.Name = new Identifier(enumMemberDeclaration.Name, AstLocation.Empty);
+			result.Value = (Expression)enumMemberDeclaration.Initializer.AcceptVisitor(this, data);
+			
+			return EndNode(enumMemberDeclaration, result);
 		}
 		
 		public AstNode VisitEventDeclaration(CSharp.EventDeclaration eventDeclaration, object data)