diff --git a/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Parser.cs b/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Parser.cs
index 2233b1efba..0878ea7057 100644
--- a/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Parser.cs
+++ b/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Parser.cs
@@ -149,7 +149,7 @@ out u);
 
 	void GlobalAttributeSection() {
 
-#line  2013 "VBNET.ATG" 
+#line  2029 "VBNET.ATG" 
 		Location startPos = t.Location; 
 		Expect(27);
 		if (la.kind == 49) {
@@ -158,20 +158,20 @@ out u);
 			lexer.NextToken();
 		} else SynErr(208);
 
-#line  2015 "VBNET.ATG" 
+#line  2031 "VBNET.ATG" 
 		string attributeTarget = t.val.ToLower(System.Globalization.CultureInfo.InvariantCulture);
 		List<ASTAttribute> attributes = new List<ASTAttribute>();
 		ASTAttribute attribute;
 		
 		Expect(13);
 		Attribute(
-#line  2019 "VBNET.ATG" 
+#line  2035 "VBNET.ATG" 
 out attribute);
 
-#line  2019 "VBNET.ATG" 
+#line  2035 "VBNET.ATG" 
 		attributes.Add(attribute); 
 		while (
-#line  2020 "VBNET.ATG" 
+#line  2036 "VBNET.ATG" 
 NotFinalComma()) {
 			if (la.kind == 12) {
 				lexer.NextToken();
@@ -183,10 +183,10 @@ NotFinalComma()) {
 				Expect(13);
 			}
 			Attribute(
-#line  2020 "VBNET.ATG" 
+#line  2036 "VBNET.ATG" 
 out attribute);
 
-#line  2020 "VBNET.ATG" 
+#line  2036 "VBNET.ATG" 
 			attributes.Add(attribute); 
 		}
 		if (la.kind == 12) {
@@ -195,7 +195,7 @@ out attribute);
 		Expect(26);
 		EndOfStmt();
 
-#line  2025 "VBNET.ATG" 
+#line  2041 "VBNET.ATG" 
 		AttributeSection section = new AttributeSection(attributeTarget, attributes);
 		section.StartLocation = startPos;
 		section.EndLocation = t.EndLocation;
@@ -312,47 +312,47 @@ out aliasedType);
 	}
 
 	void Qualident(
-#line  2733 "VBNET.ATG" 
+#line  2749 "VBNET.ATG" 
 out string qualident) {
 
-#line  2735 "VBNET.ATG" 
+#line  2751 "VBNET.ATG" 
 		string name;
 		qualidentBuilder.Length = 0; 
 		
 		Identifier();
 
-#line  2739 "VBNET.ATG" 
+#line  2755 "VBNET.ATG" 
 		qualidentBuilder.Append(t.val); 
 		while (
-#line  2740 "VBNET.ATG" 
+#line  2756 "VBNET.ATG" 
 DotAndIdentOrKw()) {
 			Expect(10);
 			IdentifierOrKeyword(
-#line  2740 "VBNET.ATG" 
+#line  2756 "VBNET.ATG" 
 out name);
 
-#line  2740 "VBNET.ATG" 
+#line  2756 "VBNET.ATG" 
 			qualidentBuilder.Append('.'); qualidentBuilder.Append(name); 
 		}
 
-#line  2742 "VBNET.ATG" 
+#line  2758 "VBNET.ATG" 
 		qualident = qualidentBuilder.ToString(); 
 	}
 
 	void TypeName(
-#line  1906 "VBNET.ATG" 
+#line  1922 "VBNET.ATG" 
 out TypeReference typeref) {
 
-#line  1907 "VBNET.ATG" 
+#line  1923 "VBNET.ATG" 
 		ArrayList rank = null; 
 		NonArrayTypeName(
-#line  1909 "VBNET.ATG" 
+#line  1925 "VBNET.ATG" 
 out typeref, false);
 		ArrayTypeModifiers(
-#line  1910 "VBNET.ATG" 
+#line  1926 "VBNET.ATG" 
 out rank);
 
-#line  1911 "VBNET.ATG" 
+#line  1927 "VBNET.ATG" 
 		if (rank != null && typeref != null) {
 		typeref.RankSpecifier = (int[])rank.ToArray(typeof(int));
 		}
@@ -369,35 +369,35 @@ out rank);
 	}
 
 	void AttributeSection(
-#line  2083 "VBNET.ATG" 
+#line  2099 "VBNET.ATG" 
 out AttributeSection section) {
 
-#line  2085 "VBNET.ATG" 
+#line  2101 "VBNET.ATG" 
 		string attributeTarget = "";List<ASTAttribute> attributes = new List<ASTAttribute>();
 		ASTAttribute attribute;
 		
 		
 		Expect(27);
 
-#line  2089 "VBNET.ATG" 
+#line  2105 "VBNET.ATG" 
 		Location startPos = t.Location; 
 		if (
-#line  2090 "VBNET.ATG" 
+#line  2106 "VBNET.ATG" 
 IsLocalAttrTarget()) {
 			if (la.kind == 93) {
 				lexer.NextToken();
 
-#line  2091 "VBNET.ATG" 
+#line  2107 "VBNET.ATG" 
 				attributeTarget = "event";
 			} else if (la.kind == 154) {
 				lexer.NextToken();
 
-#line  2092 "VBNET.ATG" 
+#line  2108 "VBNET.ATG" 
 				attributeTarget = "return";
 			} else {
 				Identifier();
 
-#line  2095 "VBNET.ATG" 
+#line  2111 "VBNET.ATG" 
 				string val = t.val.ToLower(System.Globalization.CultureInfo.InvariantCulture);
 				if (val != "field"	|| val != "method" ||
 					val != "module" || val != "param"  ||
@@ -410,20 +410,20 @@ IsLocalAttrTarget()) {
 			Expect(13);
 		}
 		Attribute(
-#line  2105 "VBNET.ATG" 
+#line  2121 "VBNET.ATG" 
 out attribute);
 
-#line  2105 "VBNET.ATG" 
+#line  2121 "VBNET.ATG" 
 		attributes.Add(attribute); 
 		while (
-#line  2106 "VBNET.ATG" 
+#line  2122 "VBNET.ATG" 
 NotFinalComma()) {
 			Expect(12);
 			Attribute(
-#line  2106 "VBNET.ATG" 
+#line  2122 "VBNET.ATG" 
 out attribute);
 
-#line  2106 "VBNET.ATG" 
+#line  2122 "VBNET.ATG" 
 			attributes.Add(attribute); 
 		}
 		if (la.kind == 12) {
@@ -431,7 +431,7 @@ out attribute);
 		}
 		Expect(26);
 
-#line  2110 "VBNET.ATG" 
+#line  2126 "VBNET.ATG" 
 		section = new AttributeSection(attributeTarget, attributes);
 		section.StartLocation = startPos;
 		section.EndLocation = t.EndLocation;
@@ -439,69 +439,69 @@ out attribute);
 	}
 
 	void TypeModifier(
-#line  2809 "VBNET.ATG" 
+#line  2825 "VBNET.ATG" 
 ModifierList m) {
 		switch (la.kind) {
 		case 148: {
 			lexer.NextToken();
 
-#line  2810 "VBNET.ATG" 
+#line  2826 "VBNET.ATG" 
 			m.Add(Modifiers.Public, t.Location); 
 			break;
 		}
 		case 147: {
 			lexer.NextToken();
 
-#line  2811 "VBNET.ATG" 
+#line  2827 "VBNET.ATG" 
 			m.Add(Modifiers.Protected, t.Location); 
 			break;
 		}
 		case 99: {
 			lexer.NextToken();
 
-#line  2812 "VBNET.ATG" 
+#line  2828 "VBNET.ATG" 
 			m.Add(Modifiers.Internal, t.Location); 
 			break;
 		}
 		case 145: {
 			lexer.NextToken();
 
-#line  2813 "VBNET.ATG" 
+#line  2829 "VBNET.ATG" 
 			m.Add(Modifiers.Private, t.Location); 
 			break;
 		}
 		case 158: {
 			lexer.NextToken();
 
-#line  2814 "VBNET.ATG" 
+#line  2830 "VBNET.ATG" 
 			m.Add(Modifiers.Static, t.Location); 
 			break;
 		}
 		case 157: {
 			lexer.NextToken();
 
-#line  2815 "VBNET.ATG" 
+#line  2831 "VBNET.ATG" 
 			m.Add(Modifiers.New, t.Location); 
 			break;
 		}
 		case 122: {
 			lexer.NextToken();
 
-#line  2816 "VBNET.ATG" 
+#line  2832 "VBNET.ATG" 
 			m.Add(Modifiers.Abstract, t.Location); 
 			break;
 		}
 		case 131: {
 			lexer.NextToken();
 
-#line  2817 "VBNET.ATG" 
+#line  2833 "VBNET.ATG" 
 			m.Add(Modifiers.Sealed, t.Location); 
 			break;
 		}
 		case 203: {
 			lexer.NextToken();
 
-#line  2818 "VBNET.ATG" 
+#line  2834 "VBNET.ATG" 
 			m.Add(Modifiers.Partial, t.Location); 
 			break;
 		}
@@ -953,42 +953,42 @@ out constraint);
 	}
 
 	void ClassBaseType(
-#line  700 "VBNET.ATG" 
+#line  716 "VBNET.ATG" 
 out TypeReference typeRef) {
 
-#line  702 "VBNET.ATG" 
+#line  718 "VBNET.ATG" 
 		typeRef = null;
 		
 		Expect(110);
 		TypeName(
-#line  705 "VBNET.ATG" 
+#line  721 "VBNET.ATG" 
 out typeRef);
 		EndOfStmt();
 	}
 
 	void TypeImplementsClause(
-#line  1478 "VBNET.ATG" 
+#line  1494 "VBNET.ATG" 
 out List<TypeReference> baseInterfaces) {
 
-#line  1480 "VBNET.ATG" 
+#line  1496 "VBNET.ATG" 
 		baseInterfaces = new List<TypeReference>();
 		TypeReference type = null;
 		
 		Expect(107);
 		TypeName(
-#line  1483 "VBNET.ATG" 
+#line  1499 "VBNET.ATG" 
 out type);
 
-#line  1485 "VBNET.ATG" 
+#line  1501 "VBNET.ATG" 
 		baseInterfaces.Add(type);
 		
 		while (la.kind == 12) {
 			lexer.NextToken();
 			TypeName(
-#line  1488 "VBNET.ATG" 
+#line  1504 "VBNET.ATG" 
 out type);
 
-#line  1489 "VBNET.ATG" 
+#line  1505 "VBNET.ATG" 
 			baseInterfaces.Add(type); 
 		}
 		EndOfStmt();
@@ -1106,10 +1106,10 @@ m, attributes);
 	}
 
 	void NonArrayTypeName(
-#line  1929 "VBNET.ATG" 
+#line  1945 "VBNET.ATG" 
 out TypeReference typeref, bool canBeUnbound) {
 
-#line  1931 "VBNET.ATG" 
+#line  1947 "VBNET.ATG" 
 		string name;
 		typeref = null;
 		bool isGlobal = false;
@@ -1119,38 +1119,38 @@ out TypeReference typeref, bool canBeUnbound) {
 				lexer.NextToken();
 				Expect(10);
 
-#line  1936 "VBNET.ATG" 
+#line  1952 "VBNET.ATG" 
 				isGlobal = true; 
 			}
 			QualIdentAndTypeArguments(
-#line  1937 "VBNET.ATG" 
+#line  1953 "VBNET.ATG" 
 out typeref, canBeUnbound);
 
-#line  1938 "VBNET.ATG" 
+#line  1954 "VBNET.ATG" 
 			typeref.IsGlobal = isGlobal; 
 			while (la.kind == 10) {
 				lexer.NextToken();
 
-#line  1939 "VBNET.ATG" 
+#line  1955 "VBNET.ATG" 
 				TypeReference nestedTypeRef; 
 				QualIdentAndTypeArguments(
-#line  1940 "VBNET.ATG" 
+#line  1956 "VBNET.ATG" 
 out nestedTypeRef, canBeUnbound);
 
-#line  1941 "VBNET.ATG" 
+#line  1957 "VBNET.ATG" 
 				typeref = new InnerClassTypeReference(typeref, nestedTypeRef.Type, nestedTypeRef.GenericTypes); 
 			}
 		} else if (la.kind == 133) {
 			lexer.NextToken();
 
-#line  1944 "VBNET.ATG" 
+#line  1960 "VBNET.ATG" 
 			typeref = new TypeReference("System.Object"); 
 		} else if (StartOf(10)) {
 			PrimitiveTypeName(
-#line  1945 "VBNET.ATG" 
+#line  1961 "VBNET.ATG" 
 out name);
 
-#line  1945 "VBNET.ATG" 
+#line  1961 "VBNET.ATG" 
 			typeref = new TypeReference(name); 
 		} else SynErr(219);
 	}
@@ -1178,27 +1178,27 @@ out f);
 	}
 
 	void InterfaceBase(
-#line  1463 "VBNET.ATG" 
+#line  1479 "VBNET.ATG" 
 out List<TypeReference> bases) {
 
-#line  1465 "VBNET.ATG" 
+#line  1481 "VBNET.ATG" 
 		TypeReference type;
 		bases = new List<TypeReference>();
 		
 		Expect(110);
 		TypeName(
-#line  1469 "VBNET.ATG" 
+#line  1485 "VBNET.ATG" 
 out type);
 
-#line  1469 "VBNET.ATG" 
+#line  1485 "VBNET.ATG" 
 		bases.Add(type); 
 		while (la.kind == 12) {
 			lexer.NextToken();
 			TypeName(
-#line  1472 "VBNET.ATG" 
+#line  1488 "VBNET.ATG" 
 out type);
 
-#line  1472 "VBNET.ATG" 
+#line  1488 "VBNET.ATG" 
 			bases.Add(type); 
 		}
 		Expect(1);
@@ -1219,27 +1219,27 @@ TypeDeclaration newType) {
 	}
 
 	void FormalParameterList(
-#line  2117 "VBNET.ATG" 
+#line  2133 "VBNET.ATG" 
 List<ParameterDeclarationExpression> parameter) {
 
-#line  2119 "VBNET.ATG" 
+#line  2135 "VBNET.ATG" 
 		ParameterDeclarationExpression p;
 		AttributeSection section;
 		List<AttributeSection> attributes = new List<AttributeSection>();
 		
 		while (la.kind == 27) {
 			AttributeSection(
-#line  2123 "VBNET.ATG" 
+#line  2139 "VBNET.ATG" 
 out section);
 
-#line  2123 "VBNET.ATG" 
+#line  2139 "VBNET.ATG" 
 			attributes.Add(section); 
 		}
 		FormalParameter(
-#line  2125 "VBNET.ATG" 
+#line  2141 "VBNET.ATG" 
 out p);
 
-#line  2127 "VBNET.ATG" 
+#line  2143 "VBNET.ATG" 
 		bool paramsFound = false;
 		p.Attributes = attributes;
 		parameter.Add(p);
@@ -1247,152 +1247,152 @@ out p);
 		while (la.kind == 12) {
 			lexer.NextToken();
 
-#line  2132 "VBNET.ATG" 
+#line  2148 "VBNET.ATG" 
 			if (paramsFound) Error("params array must be at end of parameter list"); 
 			while (la.kind == 27) {
 				AttributeSection(
-#line  2133 "VBNET.ATG" 
+#line  2149 "VBNET.ATG" 
 out section);
 
-#line  2133 "VBNET.ATG" 
+#line  2149 "VBNET.ATG" 
 				attributes.Add(section); 
 			}
 			FormalParameter(
-#line  2135 "VBNET.ATG" 
+#line  2151 "VBNET.ATG" 
 out p);
 
-#line  2135 "VBNET.ATG" 
+#line  2151 "VBNET.ATG" 
 			p.Attributes = attributes; parameter.Add(p); 
 		}
 	}
 
 	void MemberModifier(
-#line  2821 "VBNET.ATG" 
+#line  2837 "VBNET.ATG" 
 ModifierList m) {
 		switch (la.kind) {
 		case 122: {
 			lexer.NextToken();
 
-#line  2822 "VBNET.ATG" 
+#line  2838 "VBNET.ATG" 
 			m.Add(Modifiers.Abstract, t.Location);
 			break;
 		}
 		case 79: {
 			lexer.NextToken();
 
-#line  2823 "VBNET.ATG" 
+#line  2839 "VBNET.ATG" 
 			m.Add(Modifiers.Default, t.Location);
 			break;
 		}
 		case 99: {
 			lexer.NextToken();
 
-#line  2824 "VBNET.ATG" 
+#line  2840 "VBNET.ATG" 
 			m.Add(Modifiers.Internal, t.Location);
 			break;
 		}
 		case 157: {
 			lexer.NextToken();
 
-#line  2825 "VBNET.ATG" 
+#line  2841 "VBNET.ATG" 
 			m.Add(Modifiers.New, t.Location);
 			break;
 		}
 		case 142: {
 			lexer.NextToken();
 
-#line  2826 "VBNET.ATG" 
+#line  2842 "VBNET.ATG" 
 			m.Add(Modifiers.Override, t.Location);
 			break;
 		}
 		case 123: {
 			lexer.NextToken();
 
-#line  2827 "VBNET.ATG" 
+#line  2843 "VBNET.ATG" 
 			m.Add(Modifiers.Abstract, t.Location);
 			break;
 		}
 		case 145: {
 			lexer.NextToken();
 
-#line  2828 "VBNET.ATG" 
+#line  2844 "VBNET.ATG" 
 			m.Add(Modifiers.Private, t.Location);
 			break;
 		}
 		case 147: {
 			lexer.NextToken();
 
-#line  2829 "VBNET.ATG" 
+#line  2845 "VBNET.ATG" 
 			m.Add(Modifiers.Protected, t.Location);
 			break;
 		}
 		case 148: {
 			lexer.NextToken();
 
-#line  2830 "VBNET.ATG" 
+#line  2846 "VBNET.ATG" 
 			m.Add(Modifiers.Public, t.Location);
 			break;
 		}
 		case 131: {
 			lexer.NextToken();
 
-#line  2831 "VBNET.ATG" 
+#line  2847 "VBNET.ATG" 
 			m.Add(Modifiers.Sealed, t.Location);
 			break;
 		}
 		case 132: {
 			lexer.NextToken();
 
-#line  2832 "VBNET.ATG" 
+#line  2848 "VBNET.ATG" 
 			m.Add(Modifiers.Sealed, t.Location);
 			break;
 		}
 		case 158: {
 			lexer.NextToken();
 
-#line  2833 "VBNET.ATG" 
+#line  2849 "VBNET.ATG" 
 			m.Add(Modifiers.Static, t.Location);
 			break;
 		}
 		case 141: {
 			lexer.NextToken();
 
-#line  2834 "VBNET.ATG" 
+#line  2850 "VBNET.ATG" 
 			m.Add(Modifiers.Virtual, t.Location);
 			break;
 		}
 		case 140: {
 			lexer.NextToken();
 
-#line  2835 "VBNET.ATG" 
+#line  2851 "VBNET.ATG" 
 			m.Add(Modifiers.Overloads, t.Location);
 			break;
 		}
 		case 150: {
 			lexer.NextToken();
 
-#line  2836 "VBNET.ATG" 
+#line  2852 "VBNET.ATG" 
 			m.Add(Modifiers.ReadOnly, t.Location);
 			break;
 		}
 		case 184: {
 			lexer.NextToken();
 
-#line  2837 "VBNET.ATG" 
+#line  2853 "VBNET.ATG" 
 			m.Add(Modifiers.WriteOnly, t.Location);
 			break;
 		}
 		case 183: {
 			lexer.NextToken();
 
-#line  2838 "VBNET.ATG" 
+#line  2854 "VBNET.ATG" 
 			m.Add(Modifiers.WithEvents, t.Location);
 			break;
 		}
 		case 81: {
 			lexer.NextToken();
 
-#line  2839 "VBNET.ATG" 
+#line  2855 "VBNET.ATG" 
 			m.Add(Modifiers.Dim, t.Location);
 			break;
 		}
@@ -1401,18 +1401,18 @@ ModifierList m) {
 	}
 
 	void ClassMemberDecl(
-#line  696 "VBNET.ATG" 
+#line  712 "VBNET.ATG" 
 ModifierList m, List<AttributeSection> attributes) {
 		StructureMemberDecl(
-#line  697 "VBNET.ATG" 
+#line  713 "VBNET.ATG" 
 m, attributes);
 	}
 
 	void StructureMemberDecl(
-#line  710 "VBNET.ATG" 
+#line  726 "VBNET.ATG" 
 ModifierList m, List<AttributeSection> attributes) {
 
-#line  712 "VBNET.ATG" 
+#line  728 "VBNET.ATG" 
 		TypeReference type = null;
 		List<ParameterDeclarationExpression> p = new List<ParameterDeclarationExpression>();
 		Statement stmt = null;
@@ -1422,37 +1422,37 @@ ModifierList m, List<AttributeSection> attributes) {
 		switch (la.kind) {
 		case 67: case 80: case 90: case 112: case 121: case 166: {
 			NonModuleDeclaration(
-#line  719 "VBNET.ATG" 
+#line  735 "VBNET.ATG" 
 m, attributes);
 			break;
 		}
 		case 167: {
 			lexer.NextToken();
 
-#line  723 "VBNET.ATG" 
+#line  739 "VBNET.ATG" 
 			Location startPos = t.Location;
 			
 			if (StartOf(13)) {
 
-#line  727 "VBNET.ATG" 
+#line  743 "VBNET.ATG" 
 				string name = String.Empty;
 				MethodDeclaration methodDeclaration; List<string> handlesClause = null;
 				List<InterfaceImplementation> implementsClause = null;
 				
 				Identifier();
 
-#line  733 "VBNET.ATG" 
+#line  749 "VBNET.ATG" 
 				name = t.val;
 				m.Check(Modifiers.VBMethods);
 				
 				TypeParameterList(
-#line  736 "VBNET.ATG" 
+#line  752 "VBNET.ATG" 
 templates);
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  737 "VBNET.ATG" 
+#line  753 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
@@ -1460,23 +1460,23 @@ p);
 				if (la.kind == 105 || la.kind == 107) {
 					if (la.kind == 107) {
 						ImplementsClause(
-#line  740 "VBNET.ATG" 
+#line  756 "VBNET.ATG" 
 out implementsClause);
 					} else {
 						HandlesClause(
-#line  742 "VBNET.ATG" 
+#line  758 "VBNET.ATG" 
 out handlesClause);
 					}
 				}
 
-#line  745 "VBNET.ATG" 
+#line  761 "VBNET.ATG" 
 				Location endLocation = t.EndLocation; 
 				Expect(1);
 				if (
-#line  749 "VBNET.ATG" 
+#line  765 "VBNET.ATG" 
 IsMustOverride(m)) {
 
-#line  751 "VBNET.ATG" 
+#line  767 "VBNET.ATG" 
 					methodDeclaration = new MethodDeclaration(name, m.Modifier,  null, p, attributes);
 					methodDeclaration.StartLocation = m.GetDeclarationLocation(startPos);
 					methodDeclaration.EndLocation   = endLocation;
@@ -1490,7 +1490,7 @@ IsMustOverride(m)) {
 					
 				} else if (StartOf(14)) {
 
-#line  764 "VBNET.ATG" 
+#line  780 "VBNET.ATG" 
 					methodDeclaration = new MethodDeclaration(name, m.Modifier,  null, p, attributes);
 					methodDeclaration.StartLocation = m.GetDeclarationLocation(startPos);
 					methodDeclaration.EndLocation   = endLocation;
@@ -1503,25 +1503,25 @@ IsMustOverride(m)) {
 					compilationUnit.AddChild(methodDeclaration);
 					
 
-#line  776 "VBNET.ATG" 
+#line  792 "VBNET.ATG" 
 					if (ParseMethodBodies) { 
 					Block(
-#line  777 "VBNET.ATG" 
+#line  793 "VBNET.ATG" 
 out stmt);
 					Expect(88);
 					Expect(167);
 
-#line  779 "VBNET.ATG" 
+#line  795 "VBNET.ATG" 
 					} else {
 					// don't parse method body
 					lexer.SkipCurrentBlock(Tokens.Sub); stmt = new BlockStatement();
 					  }
 					
 
-#line  785 "VBNET.ATG" 
+#line  801 "VBNET.ATG" 
 					methodDeclaration.Body  = (BlockStatement)stmt; 
 
-#line  786 "VBNET.ATG" 
+#line  802 "VBNET.ATG" 
 					methodDeclaration.Body.EndLocation = t.EndLocation; 
 					Expect(1);
 				} else SynErr(221);
@@ -1531,39 +1531,39 @@ out stmt);
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  789 "VBNET.ATG" 
+#line  805 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
 				}
 
-#line  790 "VBNET.ATG" 
+#line  806 "VBNET.ATG" 
 				m.Check(Modifiers.Constructors); 
 
-#line  791 "VBNET.ATG" 
+#line  807 "VBNET.ATG" 
 				Location constructorEndLocation = t.EndLocation; 
 				Expect(1);
 
-#line  794 "VBNET.ATG" 
+#line  810 "VBNET.ATG" 
 				if (ParseMethodBodies) { 
 				Block(
-#line  795 "VBNET.ATG" 
+#line  811 "VBNET.ATG" 
 out stmt);
 				Expect(88);
 				Expect(167);
 
-#line  797 "VBNET.ATG" 
+#line  813 "VBNET.ATG" 
 				} else {
 				// don't parse method body
 				lexer.SkipCurrentBlock(Tokens.Sub); stmt = new BlockStatement();
 				  }
 				
 
-#line  803 "VBNET.ATG" 
+#line  819 "VBNET.ATG" 
 				Location endLocation = t.EndLocation; 
 				Expect(1);
 
-#line  805 "VBNET.ATG" 
+#line  821 "VBNET.ATG" 
 				ConstructorDeclaration cd = new ConstructorDeclaration("New", m.Modifier, p, attributes); 
 				cd.StartLocation = m.GetDeclarationLocation(startPos);
 				cd.EndLocation   = constructorEndLocation;
@@ -1577,7 +1577,7 @@ out stmt);
 		case 100: {
 			lexer.NextToken();
 
-#line  817 "VBNET.ATG" 
+#line  833 "VBNET.ATG" 
 			m.Check(Modifiers.VBMethods);
 			string name = String.Empty;
 			Location startPos = t.Location;
@@ -1587,16 +1587,16 @@ out stmt);
 			
 			Identifier();
 
-#line  824 "VBNET.ATG" 
+#line  840 "VBNET.ATG" 
 			name = t.val; 
 			TypeParameterList(
-#line  825 "VBNET.ATG" 
+#line  841 "VBNET.ATG" 
 templates);
 			if (la.kind == 24) {
 				lexer.NextToken();
 				if (StartOf(4)) {
 					FormalParameterList(
-#line  826 "VBNET.ATG" 
+#line  842 "VBNET.ATG" 
 p);
 				}
 				Expect(25);
@@ -1605,15 +1605,15 @@ p);
 				lexer.NextToken();
 				while (la.kind == 27) {
 					AttributeSection(
-#line  827 "VBNET.ATG" 
+#line  843 "VBNET.ATG" 
 out returnTypeAttributeSection);
 				}
 				TypeName(
-#line  827 "VBNET.ATG" 
+#line  843 "VBNET.ATG" 
 out type);
 			}
 
-#line  829 "VBNET.ATG" 
+#line  845 "VBNET.ATG" 
 			if(type == null) {
 			type = new TypeReference("System.Object");
 			}
@@ -1621,20 +1621,20 @@ out type);
 			if (la.kind == 105 || la.kind == 107) {
 				if (la.kind == 107) {
 					ImplementsClause(
-#line  835 "VBNET.ATG" 
+#line  851 "VBNET.ATG" 
 out implementsClause);
 				} else {
 					HandlesClause(
-#line  837 "VBNET.ATG" 
+#line  853 "VBNET.ATG" 
 out handlesClause);
 				}
 			}
 			Expect(1);
 			if (
-#line  843 "VBNET.ATG" 
+#line  859 "VBNET.ATG" 
 IsMustOverride(m)) {
 
-#line  845 "VBNET.ATG" 
+#line  861 "VBNET.ATG" 
 				methodDeclaration = new MethodDeclaration(name, m.Modifier,  type, p, attributes);
 				methodDeclaration.StartLocation = m.GetDeclarationLocation(startPos);
 				methodDeclaration.EndLocation   = t.EndLocation;
@@ -1650,7 +1650,7 @@ IsMustOverride(m)) {
 				
 			} else if (StartOf(14)) {
 
-#line  860 "VBNET.ATG" 
+#line  876 "VBNET.ATG" 
 				methodDeclaration = new MethodDeclaration(name, m.Modifier,  type, p, attributes);
 				methodDeclaration.StartLocation = m.GetDeclarationLocation(startPos);
 				methodDeclaration.EndLocation   = t.EndLocation;
@@ -1667,12 +1667,12 @@ IsMustOverride(m)) {
 				
 				if (ParseMethodBodies) { 
 				Block(
-#line  875 "VBNET.ATG" 
+#line  891 "VBNET.ATG" 
 out stmt);
 				Expect(88);
 				Expect(100);
 
-#line  877 "VBNET.ATG" 
+#line  893 "VBNET.ATG" 
 				} else {
 				// don't parse method body
 				lexer.SkipCurrentBlock(Tokens.Function); stmt = new BlockStatement();
@@ -1688,7 +1688,7 @@ out stmt);
 		case 78: {
 			lexer.NextToken();
 
-#line  891 "VBNET.ATG" 
+#line  907 "VBNET.ATG" 
 			m.Check(Modifiers.VBExternalMethods);
 			Location startPos = t.Location;
 			CharsetModifier charsetModifer = CharsetModifier.None;
@@ -1698,39 +1698,39 @@ out stmt);
 			
 			if (StartOf(15)) {
 				Charset(
-#line  898 "VBNET.ATG" 
+#line  914 "VBNET.ATG" 
 out charsetModifer);
 			}
 			if (la.kind == 167) {
 				lexer.NextToken();
 				Identifier();
 
-#line  901 "VBNET.ATG" 
+#line  917 "VBNET.ATG" 
 				name = t.val; 
 				Expect(115);
 				Expect(3);
 
-#line  902 "VBNET.ATG" 
+#line  918 "VBNET.ATG" 
 				library = t.literalValue as string; 
 				if (la.kind == 44) {
 					lexer.NextToken();
 					Expect(3);
 
-#line  903 "VBNET.ATG" 
+#line  919 "VBNET.ATG" 
 					alias = t.literalValue as string; 
 				}
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  904 "VBNET.ATG" 
+#line  920 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
 				}
 				Expect(1);
 
-#line  907 "VBNET.ATG" 
+#line  923 "VBNET.ATG" 
 				DeclareDeclaration declareDeclaration = new DeclareDeclaration(name, m.Modifier, null, p, attributes, library, alias, charsetModifer);
 				declareDeclaration.StartLocation = m.GetDeclarationLocation(startPos);
 				declareDeclaration.EndLocation   = t.EndLocation;
@@ -1740,25 +1740,25 @@ p);
 				lexer.NextToken();
 				Identifier();
 
-#line  914 "VBNET.ATG" 
+#line  930 "VBNET.ATG" 
 				name = t.val; 
 				Expect(115);
 				Expect(3);
 
-#line  915 "VBNET.ATG" 
+#line  931 "VBNET.ATG" 
 				library = t.literalValue as string; 
 				if (la.kind == 44) {
 					lexer.NextToken();
 					Expect(3);
 
-#line  916 "VBNET.ATG" 
+#line  932 "VBNET.ATG" 
 					alias = t.literalValue as string; 
 				}
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  917 "VBNET.ATG" 
+#line  933 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
@@ -1766,12 +1766,12 @@ p);
 				if (la.kind == 48) {
 					lexer.NextToken();
 					TypeName(
-#line  918 "VBNET.ATG" 
+#line  934 "VBNET.ATG" 
 out type);
 				}
 				Expect(1);
 
-#line  921 "VBNET.ATG" 
+#line  937 "VBNET.ATG" 
 				DeclareDeclaration declareDeclaration = new DeclareDeclaration(name, m.Modifier, type, p, attributes, library, alias, charsetModifer);
 				declareDeclaration.StartLocation = m.GetDeclarationLocation(startPos);
 				declareDeclaration.EndLocation   = t.EndLocation;
@@ -1783,7 +1783,7 @@ out type);
 		case 93: {
 			lexer.NextToken();
 
-#line  931 "VBNET.ATG" 
+#line  947 "VBNET.ATG" 
 			m.Check(Modifiers.VBEvents);
 			Location startPos = t.Location;
 			EventDeclaration eventDeclaration;
@@ -1792,19 +1792,19 @@ out type);
 			
 			Identifier();
 
-#line  937 "VBNET.ATG" 
+#line  953 "VBNET.ATG" 
 			name= t.val; 
 			if (la.kind == 48) {
 				lexer.NextToken();
 				TypeName(
-#line  939 "VBNET.ATG" 
+#line  955 "VBNET.ATG" 
 out type);
 			} else if (la.kind == 1 || la.kind == 24 || la.kind == 107) {
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  941 "VBNET.ATG" 
+#line  957 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
@@ -1812,11 +1812,11 @@ p);
 			} else SynErr(225);
 			if (la.kind == 107) {
 				ImplementsClause(
-#line  943 "VBNET.ATG" 
+#line  959 "VBNET.ATG" 
 out implementsClause);
 			}
 
-#line  945 "VBNET.ATG" 
+#line  961 "VBNET.ATG" 
 			eventDeclaration = new EventDeclaration(type, m.Modifier, p, attributes, name, implementsClause);
 			eventDeclaration.StartLocation = m.GetDeclarationLocation(startPos);
 			eventDeclaration.EndLocation = t.EndLocation;
@@ -1827,30 +1827,30 @@ out implementsClause);
 		}
 		case 2: case 47: case 49: case 50: case 51: case 70: case 144: case 169: case 176: case 177: {
 
-#line  952 "VBNET.ATG" 
+#line  968 "VBNET.ATG" 
 			Location startPos = t.Location; 
 
-#line  954 "VBNET.ATG" 
+#line  970 "VBNET.ATG" 
 			m.Check(Modifiers.Fields);
 			FieldDeclaration fd = new FieldDeclaration(attributes, null, m.Modifier);
 			fd.StartLocation = m.GetDeclarationLocation(startPos); 
 			
 			IdentifierForFieldDeclaration();
 
-#line  958 "VBNET.ATG" 
+#line  974 "VBNET.ATG" 
 			string name = t.val; 
 			VariableDeclaratorPartAfterIdentifier(
-#line  959 "VBNET.ATG" 
+#line  975 "VBNET.ATG" 
 variableDeclarators, name);
 			while (la.kind == 12) {
 				lexer.NextToken();
 				VariableDeclarator(
-#line  960 "VBNET.ATG" 
+#line  976 "VBNET.ATG" 
 variableDeclarators);
 			}
 			Expect(1);
 
-#line  963 "VBNET.ATG" 
+#line  979 "VBNET.ATG" 
 			fd.EndLocation = t.EndLocation;
 			fd.Fields = variableDeclarators;
 			compilationUnit.AddChild(fd);
@@ -1859,35 +1859,35 @@ variableDeclarators);
 		}
 		case 71: {
 
-#line  968 "VBNET.ATG" 
+#line  984 "VBNET.ATG" 
 			m.Check(Modifiers.Fields); 
 			lexer.NextToken();
 
-#line  969 "VBNET.ATG" 
+#line  985 "VBNET.ATG" 
 			m.Add(Modifiers.Const, t.Location);  
 
-#line  971 "VBNET.ATG" 
+#line  987 "VBNET.ATG" 
 			FieldDeclaration fd = new FieldDeclaration(attributes, type, m.Modifier);
 			fd.StartLocation = m.GetDeclarationLocation(t.Location);
 			List<VariableDeclaration> constantDeclarators = new List<VariableDeclaration>();
 			
 			ConstantDeclarator(
-#line  975 "VBNET.ATG" 
+#line  991 "VBNET.ATG" 
 constantDeclarators);
 			while (la.kind == 12) {
 				lexer.NextToken();
 				ConstantDeclarator(
-#line  976 "VBNET.ATG" 
+#line  992 "VBNET.ATG" 
 constantDeclarators);
 			}
 
-#line  978 "VBNET.ATG" 
+#line  994 "VBNET.ATG" 
 			fd.Fields = constantDeclarators;
 			fd.EndLocation = t.Location;
 			
 			Expect(1);
 
-#line  983 "VBNET.ATG" 
+#line  999 "VBNET.ATG" 
 			fd.EndLocation = t.EndLocation;
 			compilationUnit.AddChild(fd);
 			
@@ -1896,20 +1896,20 @@ constantDeclarators);
 		case 146: {
 			lexer.NextToken();
 
-#line  989 "VBNET.ATG" 
+#line  1005 "VBNET.ATG" 
 			m.Check(Modifiers.VBProperties);
 			Location startPos = t.Location;
 			List<InterfaceImplementation> implementsClause = null;
 			
 			Identifier();
 
-#line  993 "VBNET.ATG" 
+#line  1009 "VBNET.ATG" 
 			string propertyName = t.val; 
 			if (la.kind == 24) {
 				lexer.NextToken();
 				if (StartOf(4)) {
 					FormalParameterList(
-#line  994 "VBNET.ATG" 
+#line  1010 "VBNET.ATG" 
 p);
 				}
 				Expect(25);
@@ -1917,26 +1917,26 @@ p);
 			if (la.kind == 48) {
 				lexer.NextToken();
 				TypeName(
-#line  995 "VBNET.ATG" 
+#line  1011 "VBNET.ATG" 
 out type);
 			}
 
-#line  997 "VBNET.ATG" 
+#line  1013 "VBNET.ATG" 
 			if(type == null) {
 			type = new TypeReference("System.Object");
 			}
 			
 			if (la.kind == 107) {
 				ImplementsClause(
-#line  1001 "VBNET.ATG" 
+#line  1017 "VBNET.ATG" 
 out implementsClause);
 			}
 			Expect(1);
 			if (
-#line  1005 "VBNET.ATG" 
+#line  1021 "VBNET.ATG" 
 IsMustOverride(m)) {
 
-#line  1007 "VBNET.ATG" 
+#line  1023 "VBNET.ATG" 
 				PropertyDeclaration pDecl = new PropertyDeclaration(propertyName, type, m.Modifier, attributes);
 				pDecl.StartLocation = m.GetDeclarationLocation(startPos);
 				pDecl.EndLocation   = t.Location;
@@ -1947,7 +1947,7 @@ IsMustOverride(m)) {
 				
 			} else if (StartOf(16)) {
 
-#line  1017 "VBNET.ATG" 
+#line  1033 "VBNET.ATG" 
 				PropertyDeclaration pDecl = new PropertyDeclaration(propertyName, type, m.Modifier, attributes);
 				pDecl.StartLocation = m.GetDeclarationLocation(startPos);
 				pDecl.EndLocation   = t.Location;
@@ -1959,13 +1959,13 @@ IsMustOverride(m)) {
 				PropertySetRegion setRegion;
 				
 				AccessorDecls(
-#line  1027 "VBNET.ATG" 
+#line  1043 "VBNET.ATG" 
 out getRegion, out setRegion);
 				Expect(88);
 				Expect(146);
 				Expect(1);
 
-#line  1031 "VBNET.ATG" 
+#line  1047 "VBNET.ATG" 
 				pDecl.GetRegion = getRegion;
 				pDecl.SetRegion = setRegion;
 				pDecl.BodyEnd = t.EndLocation;
@@ -1977,11 +1977,11 @@ out getRegion, out setRegion);
 		case 204: {
 			lexer.NextToken();
 
-#line  1038 "VBNET.ATG" 
+#line  1054 "VBNET.ATG" 
 			Location startPos = t.Location; 
 			Expect(93);
 
-#line  1040 "VBNET.ATG" 
+#line  1056 "VBNET.ATG" 
 			m.Check(Modifiers.VBCustomEvents);
 			EventAddRemoveRegion eventAccessorDeclaration;
 			EventAddRegion addHandlerAccessorDeclaration = null;
@@ -1991,24 +1991,24 @@ out getRegion, out setRegion);
 			
 			Identifier();
 
-#line  1047 "VBNET.ATG" 
+#line  1063 "VBNET.ATG" 
 			string customEventName = t.val; 
 			Expect(48);
 			TypeName(
-#line  1048 "VBNET.ATG" 
+#line  1064 "VBNET.ATG" 
 out type);
 			if (la.kind == 107) {
 				ImplementsClause(
-#line  1049 "VBNET.ATG" 
+#line  1065 "VBNET.ATG" 
 out implementsClause);
 			}
 			Expect(1);
 			while (StartOf(17)) {
 				EventAccessorDeclaration(
-#line  1052 "VBNET.ATG" 
+#line  1068 "VBNET.ATG" 
 out eventAccessorDeclaration);
 
-#line  1054 "VBNET.ATG" 
+#line  1070 "VBNET.ATG" 
 				if(eventAccessorDeclaration is EventAddRegion)
 				{
 					addHandlerAccessorDeclaration = (EventAddRegion)eventAccessorDeclaration;
@@ -2027,7 +2027,7 @@ out eventAccessorDeclaration);
 			Expect(93);
 			Expect(1);
 
-#line  1070 "VBNET.ATG" 
+#line  1086 "VBNET.ATG" 
 			if(addHandlerAccessorDeclaration == null)
 			{
 				Error("Need to provide AddHandler accessor.");
@@ -2055,24 +2055,24 @@ out eventAccessorDeclaration);
 		}
 		case 187: case 201: case 202: {
 
-#line  1093 "VBNET.ATG" 
+#line  1109 "VBNET.ATG" 
 			ConversionType opConversionType = ConversionType.None; 
 			if (la.kind == 201 || la.kind == 202) {
 				if (la.kind == 202) {
 					lexer.NextToken();
 
-#line  1094 "VBNET.ATG" 
+#line  1110 "VBNET.ATG" 
 					opConversionType = ConversionType.Implicit; 
 				} else {
 					lexer.NextToken();
 
-#line  1095 "VBNET.ATG" 
+#line  1111 "VBNET.ATG" 
 					opConversionType = ConversionType.Explicit;
 				}
 			}
 			Expect(187);
 
-#line  1098 "VBNET.ATG" 
+#line  1114 "VBNET.ATG" 
 			m.Check(Modifiers.VBOperators);
 			Location startPos = t.Location;
 			TypeReference returnType = NullTypeReference.Instance;
@@ -2084,7 +2084,7 @@ out eventAccessorDeclaration);
 			List<AttributeSection> returnTypeAttributes = new List<AttributeSection>();
 			
 			OverloadableOperator(
-#line  1108 "VBNET.ATG" 
+#line  1124 "VBNET.ATG" 
 out operatorType);
 			Expect(24);
 			if (la.kind == 55) {
@@ -2092,16 +2092,16 @@ out operatorType);
 			}
 			Identifier();
 
-#line  1109 "VBNET.ATG" 
+#line  1125 "VBNET.ATG" 
 			operandName = t.val; 
 			if (la.kind == 48) {
 				lexer.NextToken();
 				TypeName(
-#line  1110 "VBNET.ATG" 
+#line  1126 "VBNET.ATG" 
 out operandType);
 			}
 
-#line  1111 "VBNET.ATG" 
+#line  1127 "VBNET.ATG" 
 			parameters.Add(new ParameterDeclarationExpression(operandType, operandName, ParameterModifiers.In)); 
 			while (la.kind == 12) {
 				lexer.NextToken();
@@ -2110,48 +2110,48 @@ out operandType);
 				}
 				Identifier();
 
-#line  1115 "VBNET.ATG" 
+#line  1131 "VBNET.ATG" 
 				operandName = t.val; 
 				if (la.kind == 48) {
 					lexer.NextToken();
 					TypeName(
-#line  1116 "VBNET.ATG" 
+#line  1132 "VBNET.ATG" 
 out operandType);
 				}
 
-#line  1117 "VBNET.ATG" 
+#line  1133 "VBNET.ATG" 
 				parameters.Add(new ParameterDeclarationExpression(operandType, operandName, ParameterModifiers.In)); 
 			}
 			Expect(25);
 
-#line  1120 "VBNET.ATG" 
+#line  1136 "VBNET.ATG" 
 			Location endPos = t.EndLocation; 
 			if (la.kind == 48) {
 				lexer.NextToken();
 				while (la.kind == 27) {
 					AttributeSection(
-#line  1121 "VBNET.ATG" 
+#line  1137 "VBNET.ATG" 
 out section);
 
-#line  1121 "VBNET.ATG" 
+#line  1137 "VBNET.ATG" 
 					returnTypeAttributes.Add(section); 
 				}
 				TypeName(
-#line  1121 "VBNET.ATG" 
+#line  1137 "VBNET.ATG" 
 out returnType);
 
-#line  1121 "VBNET.ATG" 
+#line  1137 "VBNET.ATG" 
 				endPos = t.EndLocation; 
 				Expect(1);
 			}
 			Block(
-#line  1122 "VBNET.ATG" 
+#line  1138 "VBNET.ATG" 
 out stmt);
 			Expect(88);
 			Expect(187);
 			Expect(1);
 
-#line  1124 "VBNET.ATG" 
+#line  1140 "VBNET.ATG" 
 			OperatorDeclaration operatorDeclaration = new OperatorDeclaration(m.Modifier, 
 			                                                                 attributes, 
 			                                                                 parameters, 
@@ -2174,25 +2174,25 @@ out stmt);
 	}
 
 	void EnumMemberDecl(
-#line  678 "VBNET.ATG" 
+#line  694 "VBNET.ATG" 
 out FieldDeclaration f) {
 
-#line  680 "VBNET.ATG" 
+#line  696 "VBNET.ATG" 
 		Expression expr = null;List<AttributeSection> attributes = new List<AttributeSection>();
 		AttributeSection section = null;
 		VariableDeclaration varDecl = null;
 		
 		while (la.kind == 27) {
 			AttributeSection(
-#line  684 "VBNET.ATG" 
+#line  700 "VBNET.ATG" 
 out section);
 
-#line  684 "VBNET.ATG" 
+#line  700 "VBNET.ATG" 
 			attributes.Add(section); 
 		}
 		Identifier();
 
-#line  687 "VBNET.ATG" 
+#line  703 "VBNET.ATG" 
 		f = new FieldDeclaration(attributes);
 		varDecl = new VariableDeclaration(t.val);
 		f.Fields.Add(varDecl);
@@ -2201,10 +2201,10 @@ out section);
 		if (la.kind == 11) {
 			lexer.NextToken();
 			Expr(
-#line  692 "VBNET.ATG" 
+#line  708 "VBNET.ATG" 
 out expr);
 
-#line  692 "VBNET.ATG" 
+#line  708 "VBNET.ATG" 
 			varDecl.Initializer = expr; 
 		}
 		Expect(1);
@@ -2238,17 +2238,19 @@ mod);
 			if (la.kind == 93) {
 				lexer.NextToken();
 
-#line  609 "VBNET.ATG" 
-				mod.Check(Modifiers.VBInterfaceEvents); 
+#line  610 "VBNET.ATG" 
+				mod.Check(Modifiers.VBInterfaceEvents);
+				Location startLocation = t.Location;
+				
 				Identifier();
 
-#line  610 "VBNET.ATG" 
+#line  613 "VBNET.ATG" 
 				name = t.val; 
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  611 "VBNET.ATG" 
+#line  614 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
@@ -2256,42 +2258,46 @@ p);
 				if (la.kind == 48) {
 					lexer.NextToken();
 					TypeName(
-#line  612 "VBNET.ATG" 
+#line  615 "VBNET.ATG" 
 out type);
 				}
 				Expect(1);
 
-#line  615 "VBNET.ATG" 
+#line  618 "VBNET.ATG" 
 				EventDeclaration ed = new EventDeclaration(type, mod.Modifier, p, attributes, name, null);
 				compilationUnit.AddChild(ed);
+				ed.StartLocation = startLocation;
 				ed.EndLocation = t.EndLocation;
 				
 			} else if (la.kind == 167) {
 				lexer.NextToken();
 
-#line  621 "VBNET.ATG" 
-				mod.Check(Modifiers.VBInterfaceMethods); 
+#line  626 "VBNET.ATG" 
+				Location startLocation =  t.Location;
+				mod.Check(Modifiers.VBInterfaceMethods);
+				
 				Identifier();
 
-#line  622 "VBNET.ATG" 
+#line  629 "VBNET.ATG" 
 				name = t.val; 
 				TypeParameterList(
-#line  623 "VBNET.ATG" 
+#line  630 "VBNET.ATG" 
 templates);
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  624 "VBNET.ATG" 
+#line  631 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
 				}
 				Expect(1);
 
-#line  627 "VBNET.ATG" 
+#line  634 "VBNET.ATG" 
 				MethodDeclaration md = new MethodDeclaration(name, mod.Modifier, null, p, attributes);
 				md.TypeReference = new TypeReference("", "System.Void");
+				md.StartLocation = startLocation;
 				md.EndLocation = t.EndLocation;
 				md.Templates = templates;
 				compilationUnit.AddChild(md);
@@ -2299,20 +2305,22 @@ p);
 			} else if (la.kind == 100) {
 				lexer.NextToken();
 
-#line  635 "VBNET.ATG" 
-				mod.Check(Modifiers.VBInterfaceMethods); 
+#line  644 "VBNET.ATG" 
+				mod.Check(Modifiers.VBInterfaceMethods);
+				Location startLocation = t.Location;
+				
 				Identifier();
 
-#line  636 "VBNET.ATG" 
+#line  647 "VBNET.ATG" 
 				name = t.val; 
 				TypeParameterList(
-#line  637 "VBNET.ATG" 
+#line  648 "VBNET.ATG" 
 templates);
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  638 "VBNET.ATG" 
+#line  649 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
@@ -2321,15 +2329,15 @@ p);
 					lexer.NextToken();
 					while (la.kind == 27) {
 						AttributeSection(
-#line  639 "VBNET.ATG" 
+#line  650 "VBNET.ATG" 
 out returnTypeAttributeSection);
 					}
 					TypeName(
-#line  639 "VBNET.ATG" 
+#line  650 "VBNET.ATG" 
 out type);
 				}
 
-#line  641 "VBNET.ATG" 
+#line  652 "VBNET.ATG" 
 				if(type == null) {
 				type = new TypeReference("System.Object");
 				}
@@ -2338,6 +2346,7 @@ out type);
 					returnTypeAttributeSection.AttributeTarget = "return";
 					md.Attributes.Add(returnTypeAttributeSection);
 				}
+				md.StartLocation = startLocation;
 				md.EndLocation = t.EndLocation;
 				md.Templates = templates;
 				compilationUnit.AddChild(md);
@@ -2346,17 +2355,19 @@ out type);
 			} else if (la.kind == 146) {
 				lexer.NextToken();
 
-#line  656 "VBNET.ATG" 
-				mod.Check(Modifiers.VBInterfaceProperties); 
+#line  669 "VBNET.ATG" 
+				Location startLocation = t.Location;
+				mod.Check(Modifiers.VBInterfaceProperties);
+				
 				Identifier();
 
-#line  657 "VBNET.ATG" 
+#line  672 "VBNET.ATG" 
 				name = t.val;  
 				if (la.kind == 24) {
 					lexer.NextToken();
 					if (StartOf(4)) {
 						FormalParameterList(
-#line  658 "VBNET.ATG" 
+#line  673 "VBNET.ATG" 
 p);
 					}
 					Expect(25);
@@ -2364,117 +2375,118 @@ p);
 				if (la.kind == 48) {
 					lexer.NextToken();
 					TypeName(
-#line  659 "VBNET.ATG" 
+#line  674 "VBNET.ATG" 
 out type);
 				}
 
-#line  661 "VBNET.ATG" 
+#line  676 "VBNET.ATG" 
 				if(type == null) {
 				type = new TypeReference("System.Object");
 				}
 				
 				Expect(1);
 
-#line  667 "VBNET.ATG" 
+#line  682 "VBNET.ATG" 
 				PropertyDeclaration pd = new PropertyDeclaration(name, type, mod.Modifier, attributes);
 				pd.Parameters = p;
 				pd.EndLocation = t.EndLocation;
+				pd.StartLocation = startLocation;
 				compilationUnit.AddChild(pd);
 				
 			} else SynErr(228);
 		} else if (StartOf(19)) {
 			NonModuleDeclaration(
-#line  674 "VBNET.ATG" 
+#line  690 "VBNET.ATG" 
 mod, attributes);
 		} else SynErr(229);
 	}
 
 	void Expr(
-#line  1524 "VBNET.ATG" 
+#line  1540 "VBNET.ATG" 
 out Expression expr) {
 		DisjunctionExpr(
-#line  1526 "VBNET.ATG" 
+#line  1542 "VBNET.ATG" 
 out expr);
 	}
 
 	void ImplementsClause(
-#line  1495 "VBNET.ATG" 
+#line  1511 "VBNET.ATG" 
 out List<InterfaceImplementation> baseInterfaces) {
 
-#line  1497 "VBNET.ATG" 
+#line  1513 "VBNET.ATG" 
 		baseInterfaces = new List<InterfaceImplementation>();
 		TypeReference type = null;
 		string memberName = null;
 		
 		Expect(107);
 		NonArrayTypeName(
-#line  1502 "VBNET.ATG" 
+#line  1518 "VBNET.ATG" 
 out type, false);
 
-#line  1503 "VBNET.ATG" 
+#line  1519 "VBNET.ATG" 
 		if (type != null) memberName = TypeReference.StripLastIdentifierFromType(ref type); 
 
-#line  1504 "VBNET.ATG" 
+#line  1520 "VBNET.ATG" 
 		baseInterfaces.Add(new InterfaceImplementation(type, memberName)); 
 		while (la.kind == 12) {
 			lexer.NextToken();
 			NonArrayTypeName(
-#line  1506 "VBNET.ATG" 
+#line  1522 "VBNET.ATG" 
 out type, false);
 
-#line  1507 "VBNET.ATG" 
+#line  1523 "VBNET.ATG" 
 			if (type != null) memberName = TypeReference.StripLastIdentifierFromType(ref type); 
 
-#line  1508 "VBNET.ATG" 
+#line  1524 "VBNET.ATG" 
 			baseInterfaces.Add(new InterfaceImplementation(type, memberName)); 
 		}
 	}
 
 	void HandlesClause(
-#line  1453 "VBNET.ATG" 
+#line  1469 "VBNET.ATG" 
 out List<string> handlesClause) {
 
-#line  1455 "VBNET.ATG" 
+#line  1471 "VBNET.ATG" 
 		handlesClause = new List<string>();
 		string name;
 		
 		Expect(105);
 		EventMemberSpecifier(
-#line  1458 "VBNET.ATG" 
+#line  1474 "VBNET.ATG" 
 out name);
 
-#line  1458 "VBNET.ATG" 
+#line  1474 "VBNET.ATG" 
 		handlesClause.Add(name); 
 		while (la.kind == 12) {
 			lexer.NextToken();
 			EventMemberSpecifier(
-#line  1459 "VBNET.ATG" 
+#line  1475 "VBNET.ATG" 
 out name);
 
-#line  1459 "VBNET.ATG" 
+#line  1475 "VBNET.ATG" 
 			handlesClause.Add(name); 
 		}
 	}
 
 	void Block(
-#line  2173 "VBNET.ATG" 
+#line  2189 "VBNET.ATG" 
 out Statement stmt) {
 
-#line  2176 "VBNET.ATG" 
+#line  2192 "VBNET.ATG" 
 		BlockStatement blockStmt = new BlockStatement();
 		blockStmt.StartLocation = t.Location;
 		compilationUnit.BlockStart(blockStmt);
 		
 		while (StartOf(20) || 
-#line  2181 "VBNET.ATG" 
+#line  2197 "VBNET.ATG" 
 IsEndStmtAhead()) {
 			if (
-#line  2181 "VBNET.ATG" 
+#line  2197 "VBNET.ATG" 
 IsEndStmtAhead()) {
 				Expect(88);
 				EndOfStmt();
 
-#line  2181 "VBNET.ATG" 
+#line  2197 "VBNET.ATG" 
 				compilationUnit.AddChild(new EndStatement()); 
 			} else {
 				Statement();
@@ -2482,7 +2494,7 @@ IsEndStmtAhead()) {
 			}
 		}
 
-#line  2186 "VBNET.ATG" 
+#line  2202 "VBNET.ATG" 
 		stmt = blockStmt;
 		blockStmt.EndLocation = t.EndLocation;
 		compilationUnit.BlockEnd();
@@ -2490,26 +2502,26 @@ IsEndStmtAhead()) {
 	}
 
 	void Charset(
-#line  1445 "VBNET.ATG" 
+#line  1461 "VBNET.ATG" 
 out CharsetModifier charsetModifier) {
 
-#line  1446 "VBNET.ATG" 
+#line  1462 "VBNET.ATG" 
 		charsetModifier = CharsetModifier.None; 
 		if (la.kind == 100 || la.kind == 167) {
 		} else if (la.kind == 47) {
 			lexer.NextToken();
 
-#line  1447 "VBNET.ATG" 
+#line  1463 "VBNET.ATG" 
 			charsetModifier = CharsetModifier.Ansi; 
 		} else if (la.kind == 50) {
 			lexer.NextToken();
 
-#line  1448 "VBNET.ATG" 
+#line  1464 "VBNET.ATG" 
 			charsetModifier = CharsetModifier.Auto; 
 		} else if (la.kind == 176) {
 			lexer.NextToken();
 
-#line  1449 "VBNET.ATG" 
+#line  1465 "VBNET.ATG" 
 			charsetModifier = CharsetModifier.Unicode; 
 		} else SynErr(230);
 	}
@@ -2561,38 +2573,38 @@ out CharsetModifier charsetModifier) {
 	}
 
 	void VariableDeclaratorPartAfterIdentifier(
-#line  1325 "VBNET.ATG" 
+#line  1341 "VBNET.ATG" 
 List<VariableDeclaration> fieldDeclaration, string name) {
 
-#line  1327 "VBNET.ATG" 
+#line  1343 "VBNET.ATG" 
 		Expression expr = null;
 		TypeReference type = null;
 		ArrayList rank = null;
 		List<Expression> dimension = null;
 		
 		if (
-#line  1332 "VBNET.ATG" 
+#line  1348 "VBNET.ATG" 
 IsSize() && !IsDims()) {
 			ArrayInitializationModifier(
-#line  1332 "VBNET.ATG" 
+#line  1348 "VBNET.ATG" 
 out dimension);
 		}
 		if (
-#line  1333 "VBNET.ATG" 
+#line  1349 "VBNET.ATG" 
 IsDims()) {
 			ArrayNameModifier(
-#line  1333 "VBNET.ATG" 
+#line  1349 "VBNET.ATG" 
 out rank);
 		}
 		if (
-#line  1335 "VBNET.ATG" 
+#line  1351 "VBNET.ATG" 
 IsObjectCreation()) {
 			Expect(48);
 			ObjectCreateExpression(
-#line  1335 "VBNET.ATG" 
+#line  1351 "VBNET.ATG" 
 out expr);
 
-#line  1337 "VBNET.ATG" 
+#line  1353 "VBNET.ATG" 
 			if (expr is ObjectCreateExpression) {
 			type = ((ObjectCreateExpression)expr).CreateType;
 			} else {
@@ -2603,10 +2615,10 @@ out expr);
 			if (la.kind == 48) {
 				lexer.NextToken();
 				TypeName(
-#line  1344 "VBNET.ATG" 
+#line  1360 "VBNET.ATG" 
 out type);
 
-#line  1346 "VBNET.ATG" 
+#line  1362 "VBNET.ATG" 
 				if (type != null) {
 				for (int i = fieldDeclaration.Count - 1; i >= 0; i--) {
 					VariableDeclaration vd = fieldDeclaration[i];
@@ -2619,7 +2631,7 @@ out type);
 				 
 			}
 
-#line  1358 "VBNET.ATG" 
+#line  1374 "VBNET.ATG" 
 			if (type == null && (dimension != null || rank != null)) {
 			type = new TypeReference("");
 			}
@@ -2648,52 +2660,52 @@ out type);
 			if (la.kind == 11) {
 				lexer.NextToken();
 				VariableInitializer(
-#line  1383 "VBNET.ATG" 
+#line  1399 "VBNET.ATG" 
 out expr);
 			}
 		} else SynErr(232);
 
-#line  1385 "VBNET.ATG" 
+#line  1401 "VBNET.ATG" 
 		fieldDeclaration.Add(new VariableDeclaration(name, expr, type)); 
 	}
 
 	void VariableDeclarator(
-#line  1319 "VBNET.ATG" 
+#line  1335 "VBNET.ATG" 
 List<VariableDeclaration> fieldDeclaration) {
 		Identifier();
 
-#line  1321 "VBNET.ATG" 
+#line  1337 "VBNET.ATG" 
 		string name = t.val; 
 		VariableDeclaratorPartAfterIdentifier(
-#line  1322 "VBNET.ATG" 
+#line  1338 "VBNET.ATG" 
 fieldDeclaration, name);
 	}
 
 	void ConstantDeclarator(
-#line  1302 "VBNET.ATG" 
+#line  1318 "VBNET.ATG" 
 List<VariableDeclaration> constantDeclaration) {
 
-#line  1304 "VBNET.ATG" 
+#line  1320 "VBNET.ATG" 
 		Expression expr = null;
 		TypeReference type = null;
 		string name = String.Empty;
 		
 		Identifier();
 
-#line  1308 "VBNET.ATG" 
+#line  1324 "VBNET.ATG" 
 		name = t.val; 
 		if (la.kind == 48) {
 			lexer.NextToken();
 			TypeName(
-#line  1309 "VBNET.ATG" 
+#line  1325 "VBNET.ATG" 
 out type);
 		}
 		Expect(11);
 		Expr(
-#line  1310 "VBNET.ATG" 
+#line  1326 "VBNET.ATG" 
 out expr);
 
-#line  1312 "VBNET.ATG" 
+#line  1328 "VBNET.ATG" 
 		VariableDeclaration f = new VariableDeclaration(name, expr);
 		f.TypeReference = type;
 		constantDeclaration.Add(f);
@@ -2701,10 +2713,10 @@ out expr);
 	}
 
 	void AccessorDecls(
-#line  1236 "VBNET.ATG" 
+#line  1252 "VBNET.ATG" 
 out PropertyGetRegion getBlock, out PropertySetRegion setBlock) {
 
-#line  1238 "VBNET.ATG" 
+#line  1254 "VBNET.ATG" 
 		List<AttributeSection> attributes = new List<AttributeSection>();
 		AttributeSection section;
 		getBlock = null;
@@ -2712,60 +2724,60 @@ out PropertyGetRegion getBlock, out PropertySetRegion setBlock) {
 		
 		while (la.kind == 27) {
 			AttributeSection(
-#line  1243 "VBNET.ATG" 
+#line  1259 "VBNET.ATG" 
 out section);
 
-#line  1243 "VBNET.ATG" 
+#line  1259 "VBNET.ATG" 
 			attributes.Add(section); 
 		}
 		if (StartOf(22)) {
 			GetAccessorDecl(
-#line  1245 "VBNET.ATG" 
+#line  1261 "VBNET.ATG" 
 out getBlock, attributes);
 			if (StartOf(23)) {
 
-#line  1247 "VBNET.ATG" 
+#line  1263 "VBNET.ATG" 
 				attributes = new List<AttributeSection>(); 
 				while (la.kind == 27) {
 					AttributeSection(
-#line  1248 "VBNET.ATG" 
+#line  1264 "VBNET.ATG" 
 out section);
 
-#line  1248 "VBNET.ATG" 
+#line  1264 "VBNET.ATG" 
 					attributes.Add(section); 
 				}
 				SetAccessorDecl(
-#line  1249 "VBNET.ATG" 
+#line  1265 "VBNET.ATG" 
 out setBlock, attributes);
 			}
 		} else if (StartOf(24)) {
 			SetAccessorDecl(
-#line  1252 "VBNET.ATG" 
+#line  1268 "VBNET.ATG" 
 out setBlock, attributes);
 			if (StartOf(25)) {
 
-#line  1254 "VBNET.ATG" 
+#line  1270 "VBNET.ATG" 
 				attributes = new List<AttributeSection>(); 
 				while (la.kind == 27) {
 					AttributeSection(
-#line  1255 "VBNET.ATG" 
+#line  1271 "VBNET.ATG" 
 out section);
 
-#line  1255 "VBNET.ATG" 
+#line  1271 "VBNET.ATG" 
 					attributes.Add(section); 
 				}
 				GetAccessorDecl(
-#line  1256 "VBNET.ATG" 
+#line  1272 "VBNET.ATG" 
 out getBlock, attributes);
 			}
 		} else SynErr(233);
 	}
 
 	void EventAccessorDeclaration(
-#line  1199 "VBNET.ATG" 
+#line  1215 "VBNET.ATG" 
 out EventAddRemoveRegion eventAccessorDeclaration) {
 
-#line  1201 "VBNET.ATG" 
+#line  1217 "VBNET.ATG" 
 		Statement stmt = null;
 		List<ParameterDeclarationExpression> p = new List<ParameterDeclarationExpression>();
 		AttributeSection section;
@@ -2774,10 +2786,10 @@ out EventAddRemoveRegion eventAccessorDeclaration) {
 		
 		while (la.kind == 27) {
 			AttributeSection(
-#line  1207 "VBNET.ATG" 
+#line  1223 "VBNET.ATG" 
 out section);
 
-#line  1207 "VBNET.ATG" 
+#line  1223 "VBNET.ATG" 
 			attributes.Add(section); 
 		}
 		if (la.kind == 42) {
@@ -2786,20 +2798,20 @@ out section);
 				lexer.NextToken();
 				if (StartOf(4)) {
 					FormalParameterList(
-#line  1209 "VBNET.ATG" 
+#line  1225 "VBNET.ATG" 
 p);
 				}
 				Expect(25);
 			}
 			Expect(1);
 			Block(
-#line  1210 "VBNET.ATG" 
+#line  1226 "VBNET.ATG" 
 out stmt);
 			Expect(88);
 			Expect(42);
 			Expect(1);
 
-#line  1212 "VBNET.ATG" 
+#line  1228 "VBNET.ATG" 
 			eventAccessorDeclaration = new EventAddRegion(attributes);
 			eventAccessorDeclaration.Block = (BlockStatement)stmt;
 			eventAccessorDeclaration.Parameters = p;
@@ -2810,20 +2822,20 @@ out stmt);
 				lexer.NextToken();
 				if (StartOf(4)) {
 					FormalParameterList(
-#line  1217 "VBNET.ATG" 
+#line  1233 "VBNET.ATG" 
 p);
 				}
 				Expect(25);
 			}
 			Expect(1);
 			Block(
-#line  1218 "VBNET.ATG" 
+#line  1234 "VBNET.ATG" 
 out stmt);
 			Expect(88);
 			Expect(152);
 			Expect(1);
 
-#line  1220 "VBNET.ATG" 
+#line  1236 "VBNET.ATG" 
 			eventAccessorDeclaration = new EventRemoveRegion(attributes);
 			eventAccessorDeclaration.Block = (BlockStatement)stmt;
 			eventAccessorDeclaration.Parameters = p;
@@ -2834,20 +2846,20 @@ out stmt);
 				lexer.NextToken();
 				if (StartOf(4)) {
 					FormalParameterList(
-#line  1225 "VBNET.ATG" 
+#line  1241 "VBNET.ATG" 
 p);
 				}
 				Expect(25);
 			}
 			Expect(1);
 			Block(
-#line  1226 "VBNET.ATG" 
+#line  1242 "VBNET.ATG" 
 out stmt);
 			Expect(88);
 			Expect(149);
 			Expect(1);
 
-#line  1228 "VBNET.ATG" 
+#line  1244 "VBNET.ATG" 
 			eventAccessorDeclaration = new EventRaiseRegion(attributes);
 			eventAccessorDeclaration.Block = (BlockStatement)stmt;
 			eventAccessorDeclaration.Parameters = p;
@@ -2856,163 +2868,163 @@ out stmt);
 	}
 
 	void OverloadableOperator(
-#line  1141 "VBNET.ATG" 
+#line  1157 "VBNET.ATG" 
 out OverloadableOperatorType operatorType) {
 
-#line  1142 "VBNET.ATG" 
+#line  1158 "VBNET.ATG" 
 		operatorType = OverloadableOperatorType.None; 
 		switch (la.kind) {
 		case 14: {
 			lexer.NextToken();
 
-#line  1144 "VBNET.ATG" 
+#line  1160 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Add; 
 			break;
 		}
 		case 15: {
 			lexer.NextToken();
 
-#line  1146 "VBNET.ATG" 
+#line  1162 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Subtract; 
 			break;
 		}
 		case 16: {
 			lexer.NextToken();
 
-#line  1148 "VBNET.ATG" 
+#line  1164 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Multiply; 
 			break;
 		}
 		case 17: {
 			lexer.NextToken();
 
-#line  1150 "VBNET.ATG" 
+#line  1166 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Divide; 
 			break;
 		}
 		case 18: {
 			lexer.NextToken();
 
-#line  1152 "VBNET.ATG" 
+#line  1168 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.DivideInteger; 
 			break;
 		}
 		case 19: {
 			lexer.NextToken();
 
-#line  1154 "VBNET.ATG" 
+#line  1170 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Concat; 
 			break;
 		}
 		case 116: {
 			lexer.NextToken();
 
-#line  1156 "VBNET.ATG" 
+#line  1172 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Like; 
 			break;
 		}
 		case 120: {
 			lexer.NextToken();
 
-#line  1158 "VBNET.ATG" 
+#line  1174 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Modulus; 
 			break;
 		}
 		case 45: {
 			lexer.NextToken();
 
-#line  1160 "VBNET.ATG" 
+#line  1176 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.BitwiseAnd; 
 			break;
 		}
 		case 138: {
 			lexer.NextToken();
 
-#line  1162 "VBNET.ATG" 
+#line  1178 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.BitwiseOr; 
 			break;
 		}
 		case 185: {
 			lexer.NextToken();
 
-#line  1164 "VBNET.ATG" 
+#line  1180 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.ExclusiveOr; 
 			break;
 		}
 		case 20: {
 			lexer.NextToken();
 
-#line  1166 "VBNET.ATG" 
+#line  1182 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Power; 
 			break;
 		}
 		case 31: {
 			lexer.NextToken();
 
-#line  1168 "VBNET.ATG" 
+#line  1184 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.ShiftLeft; 
 			break;
 		}
 		case 32: {
 			lexer.NextToken();
 
-#line  1170 "VBNET.ATG" 
+#line  1186 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.ShiftRight; 
 			break;
 		}
 		case 11: {
 			lexer.NextToken();
 
-#line  1172 "VBNET.ATG" 
+#line  1188 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.Equality; 
 			break;
 		}
 		case 28: {
 			lexer.NextToken();
 
-#line  1174 "VBNET.ATG" 
+#line  1190 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.InEquality; 
 			break;
 		}
 		case 27: {
 			lexer.NextToken();
 
-#line  1176 "VBNET.ATG" 
+#line  1192 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.LessThan; 
 			break;
 		}
 		case 30: {
 			lexer.NextToken();
 
-#line  1178 "VBNET.ATG" 
+#line  1194 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.LessThanOrEqual; 
 			break;
 		}
 		case 26: {
 			lexer.NextToken();
 
-#line  1180 "VBNET.ATG" 
+#line  1196 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.GreaterThan; 
 			break;
 		}
 		case 29: {
 			lexer.NextToken();
 
-#line  1182 "VBNET.ATG" 
+#line  1198 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.GreaterThanOrEqual; 
 			break;
 		}
 		case 75: {
 			lexer.NextToken();
 
-#line  1184 "VBNET.ATG" 
+#line  1200 "VBNET.ATG" 
 			operatorType = OverloadableOperatorType.CType; 
 			break;
 		}
 		case 2: case 47: case 49: case 50: case 51: case 70: case 144: case 169: case 176: case 177: case 204: {
 			Identifier();
 
-#line  1188 "VBNET.ATG" 
+#line  1204 "VBNET.ATG" 
 			string opName = t.val; 
 			if (string.Equals(opName, "istrue", StringComparison.InvariantCultureIgnoreCase)) {
 				operatorType = OverloadableOperatorType.IsTrue;
@@ -3029,67 +3041,67 @@ out OverloadableOperatorType operatorType) {
 	}
 
 	void GetAccessorDecl(
-#line  1262 "VBNET.ATG" 
+#line  1278 "VBNET.ATG" 
 out PropertyGetRegion getBlock, List<AttributeSection> attributes) {
 
-#line  1263 "VBNET.ATG" 
+#line  1279 "VBNET.ATG" 
 		Statement stmt = null; Modifiers m; 
 		PropertyAccessorAccessModifier(
-#line  1265 "VBNET.ATG" 
+#line  1281 "VBNET.ATG" 
 out m);
 		Expect(101);
 
-#line  1267 "VBNET.ATG" 
+#line  1283 "VBNET.ATG" 
 		Location startLocation = t.Location; 
 		Expect(1);
 		Block(
-#line  1269 "VBNET.ATG" 
+#line  1285 "VBNET.ATG" 
 out stmt);
 
-#line  1270 "VBNET.ATG" 
+#line  1286 "VBNET.ATG" 
 		getBlock = new PropertyGetRegion((BlockStatement)stmt, attributes); 
 		Expect(88);
 		Expect(101);
 
-#line  1272 "VBNET.ATG" 
+#line  1288 "VBNET.ATG" 
 		getBlock.Modifier = m; 
 
-#line  1273 "VBNET.ATG" 
+#line  1289 "VBNET.ATG" 
 		getBlock.StartLocation = startLocation; getBlock.EndLocation = t.EndLocation; 
 		Expect(1);
 	}
 
 	void SetAccessorDecl(
-#line  1278 "VBNET.ATG" 
+#line  1294 "VBNET.ATG" 
 out PropertySetRegion setBlock, List<AttributeSection> attributes) {
 
-#line  1280 "VBNET.ATG" 
+#line  1296 "VBNET.ATG" 
 		Statement stmt = null;
 		List<ParameterDeclarationExpression> p = new List<ParameterDeclarationExpression>();
 		Modifiers m;
 		
 		PropertyAccessorAccessModifier(
-#line  1285 "VBNET.ATG" 
+#line  1301 "VBNET.ATG" 
 out m);
 		Expect(156);
 
-#line  1287 "VBNET.ATG" 
+#line  1303 "VBNET.ATG" 
 		Location startLocation = t.Location; 
 		if (la.kind == 24) {
 			lexer.NextToken();
 			if (StartOf(4)) {
 				FormalParameterList(
-#line  1288 "VBNET.ATG" 
+#line  1304 "VBNET.ATG" 
 p);
 			}
 			Expect(25);
 		}
 		Expect(1);
 		Block(
-#line  1290 "VBNET.ATG" 
+#line  1306 "VBNET.ATG" 
 out stmt);
 
-#line  1292 "VBNET.ATG" 
+#line  1308 "VBNET.ATG" 
 		setBlock = new PropertySetRegion((BlockStatement)stmt, attributes);
 		setBlock.Modifier = m;
 		setBlock.Parameters = p;
@@ -3097,73 +3109,73 @@ out stmt);
 		Expect(88);
 		Expect(156);
 
-#line  1297 "VBNET.ATG" 
+#line  1313 "VBNET.ATG" 
 		setBlock.StartLocation = startLocation; setBlock.EndLocation = t.EndLocation; 
 		Expect(1);
 	}
 
 	void PropertyAccessorAccessModifier(
-#line  2842 "VBNET.ATG" 
+#line  2858 "VBNET.ATG" 
 out Modifiers m) {
 
-#line  2843 "VBNET.ATG" 
+#line  2859 "VBNET.ATG" 
 		m = Modifiers.None; 
 		while (StartOf(26)) {
 			if (la.kind == 148) {
 				lexer.NextToken();
 
-#line  2845 "VBNET.ATG" 
+#line  2861 "VBNET.ATG" 
 				m |= Modifiers.Public; 
 			} else if (la.kind == 147) {
 				lexer.NextToken();
 
-#line  2846 "VBNET.ATG" 
+#line  2862 "VBNET.ATG" 
 				m |= Modifiers.Protected; 
 			} else if (la.kind == 99) {
 				lexer.NextToken();
 
-#line  2847 "VBNET.ATG" 
+#line  2863 "VBNET.ATG" 
 				m |= Modifiers.Internal; 
 			} else {
 				lexer.NextToken();
 
-#line  2848 "VBNET.ATG" 
+#line  2864 "VBNET.ATG" 
 				m |= Modifiers.Private; 
 			}
 		}
 	}
 
 	void ArrayInitializationModifier(
-#line  1389 "VBNET.ATG" 
+#line  1405 "VBNET.ATG" 
 out List<Expression> arrayModifiers) {
 
-#line  1391 "VBNET.ATG" 
+#line  1407 "VBNET.ATG" 
 		arrayModifiers = null;
 		
 		Expect(24);
 		InitializationRankList(
-#line  1393 "VBNET.ATG" 
+#line  1409 "VBNET.ATG" 
 out arrayModifiers);
 		Expect(25);
 	}
 
 	void ArrayNameModifier(
-#line  1965 "VBNET.ATG" 
+#line  1981 "VBNET.ATG" 
 out ArrayList arrayModifiers) {
 
-#line  1967 "VBNET.ATG" 
+#line  1983 "VBNET.ATG" 
 		arrayModifiers = null;
 		
 		ArrayTypeModifiers(
-#line  1969 "VBNET.ATG" 
+#line  1985 "VBNET.ATG" 
 out arrayModifiers);
 	}
 
 	void ObjectCreateExpression(
-#line  1818 "VBNET.ATG" 
+#line  1834 "VBNET.ATG" 
 out Expression oce) {
 
-#line  1820 "VBNET.ATG" 
+#line  1836 "VBNET.ATG" 
 		TypeReference type = null;
 		Expression initializer = null;
 		List<Expression> arguments = null;
@@ -3173,38 +3185,38 @@ out Expression oce) {
 		
 		Expect(127);
 		NonArrayTypeName(
-#line  1827 "VBNET.ATG" 
+#line  1843 "VBNET.ATG" 
 out type, false);
 		if (la.kind == 24) {
 			lexer.NextToken();
 			NormalOrReDimArgumentList(
-#line  1828 "VBNET.ATG" 
+#line  1844 "VBNET.ATG" 
 out arguments, out canBeNormal, out canBeReDim);
 			Expect(25);
 			if (la.kind == 22 || 
-#line  1829 "VBNET.ATG" 
+#line  1845 "VBNET.ATG" 
 la.kind == Tokens.OpenParenthesis) {
 				if (
-#line  1829 "VBNET.ATG" 
+#line  1845 "VBNET.ATG" 
 la.kind == Tokens.OpenParenthesis) {
 					ArrayTypeModifiers(
-#line  1830 "VBNET.ATG" 
+#line  1846 "VBNET.ATG" 
 out dimensions);
 					ArrayInitializer(
-#line  1831 "VBNET.ATG" 
+#line  1847 "VBNET.ATG" 
 out initializer);
 				} else {
 					ArrayInitializer(
-#line  1832 "VBNET.ATG" 
+#line  1848 "VBNET.ATG" 
 out initializer);
 				}
 			}
 
-#line  1834 "VBNET.ATG" 
+#line  1850 "VBNET.ATG" 
 			if (canBeReDim && !canBeNormal && initializer == null) initializer = new ArrayInitializerExpression(); 
 		}
 
-#line  1837 "VBNET.ATG" 
+#line  1853 "VBNET.ATG" 
 		if (type == null) type = new TypeReference("Object"); // fallback type on parser errors
 		if (initializer == null) {
 			oce = new ObjectCreateExpression(type, arguments);
@@ -3220,116 +3232,116 @@ out initializer);
 	}
 
 	void VariableInitializer(
-#line  1417 "VBNET.ATG" 
+#line  1433 "VBNET.ATG" 
 out Expression initializerExpression) {
 
-#line  1419 "VBNET.ATG" 
+#line  1435 "VBNET.ATG" 
 		initializerExpression = null;
 		
 		if (StartOf(27)) {
 			Expr(
-#line  1421 "VBNET.ATG" 
+#line  1437 "VBNET.ATG" 
 out initializerExpression);
 		} else if (la.kind == 22) {
 			ArrayInitializer(
-#line  1422 "VBNET.ATG" 
+#line  1438 "VBNET.ATG" 
 out initializerExpression);
 		} else SynErr(236);
 	}
 
 	void InitializationRankList(
-#line  1397 "VBNET.ATG" 
+#line  1413 "VBNET.ATG" 
 out List<Expression> rank) {
 
-#line  1399 "VBNET.ATG" 
+#line  1415 "VBNET.ATG" 
 		rank = new List<Expression>();
 		Expression expr = null;
 		
 		Expr(
-#line  1402 "VBNET.ATG" 
+#line  1418 "VBNET.ATG" 
 out expr);
 		if (la.kind == 172) {
 			lexer.NextToken();
 
-#line  1403 "VBNET.ATG" 
+#line  1419 "VBNET.ATG" 
 			EnsureIsZero(expr); 
 			Expr(
-#line  1404 "VBNET.ATG" 
+#line  1420 "VBNET.ATG" 
 out expr);
 		}
 
-#line  1406 "VBNET.ATG" 
+#line  1422 "VBNET.ATG" 
 		if (expr != null) { rank.Add(expr); } 
 		while (la.kind == 12) {
 			lexer.NextToken();
 			Expr(
-#line  1408 "VBNET.ATG" 
+#line  1424 "VBNET.ATG" 
 out expr);
 			if (la.kind == 172) {
 				lexer.NextToken();
 
-#line  1409 "VBNET.ATG" 
+#line  1425 "VBNET.ATG" 
 				EnsureIsZero(expr); 
 				Expr(
-#line  1410 "VBNET.ATG" 
+#line  1426 "VBNET.ATG" 
 out expr);
 			}
 
-#line  1412 "VBNET.ATG" 
+#line  1428 "VBNET.ATG" 
 			if (expr != null) { rank.Add(expr); } 
 		}
 	}
 
 	void ArrayInitializer(
-#line  1426 "VBNET.ATG" 
+#line  1442 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1428 "VBNET.ATG" 
+#line  1444 "VBNET.ATG" 
 		Expression expr = null;
 		ArrayInitializerExpression initializer = new ArrayInitializerExpression();
 		
 		Expect(22);
 		if (StartOf(28)) {
 			VariableInitializer(
-#line  1433 "VBNET.ATG" 
+#line  1449 "VBNET.ATG" 
 out expr);
 
-#line  1435 "VBNET.ATG" 
+#line  1451 "VBNET.ATG" 
 			if (expr != null) { initializer.CreateExpressions.Add(expr); }
 			
 			while (
-#line  1438 "VBNET.ATG" 
+#line  1454 "VBNET.ATG" 
 NotFinalComma()) {
 				Expect(12);
 				VariableInitializer(
-#line  1438 "VBNET.ATG" 
+#line  1454 "VBNET.ATG" 
 out expr);
 
-#line  1439 "VBNET.ATG" 
+#line  1455 "VBNET.ATG" 
 				if (expr != null) { initializer.CreateExpressions.Add(expr); } 
 			}
 		}
 		Expect(23);
 
-#line  1442 "VBNET.ATG" 
+#line  1458 "VBNET.ATG" 
 		outExpr = initializer; 
 	}
 
 	void EventMemberSpecifier(
-#line  1512 "VBNET.ATG" 
+#line  1528 "VBNET.ATG" 
 out string name) {
 
-#line  1513 "VBNET.ATG" 
+#line  1529 "VBNET.ATG" 
 		string type; name = String.Empty; 
 		if (StartOf(13)) {
 			Identifier();
 
-#line  1514 "VBNET.ATG" 
+#line  1530 "VBNET.ATG" 
 			type = t.val; 
 			Expect(10);
 			Identifier();
 
-#line  1516 "VBNET.ATG" 
+#line  1532 "VBNET.ATG" 
 			name = type + "." + t.val; 
 		} else if (la.kind == 124) {
 			lexer.NextToken();
@@ -3337,128 +3349,128 @@ out string name) {
 			if (StartOf(13)) {
 				Identifier();
 
-#line  1519 "VBNET.ATG" 
+#line  1535 "VBNET.ATG" 
 				name = "MyBase." + t.val; 
 			} else if (la.kind == 92) {
 				lexer.NextToken();
 
-#line  1520 "VBNET.ATG" 
+#line  1536 "VBNET.ATG" 
 				name = "MyBase.Error"; 
 			} else SynErr(237);
 		} else SynErr(238);
 	}
 
 	void DisjunctionExpr(
-#line  1662 "VBNET.ATG" 
+#line  1678 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1664 "VBNET.ATG" 
+#line  1680 "VBNET.ATG" 
 		Expression expr;
 		BinaryOperatorType op = BinaryOperatorType.None;
 		
 		ConjunctionExpr(
-#line  1667 "VBNET.ATG" 
+#line  1683 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 138 || la.kind == 139 || la.kind == 185) {
 			if (la.kind == 138) {
 				lexer.NextToken();
 
-#line  1670 "VBNET.ATG" 
+#line  1686 "VBNET.ATG" 
 				op = BinaryOperatorType.BitwiseOr; 
 			} else if (la.kind == 139) {
 				lexer.NextToken();
 
-#line  1671 "VBNET.ATG" 
+#line  1687 "VBNET.ATG" 
 				op = BinaryOperatorType.LogicalOr; 
 			} else {
 				lexer.NextToken();
 
-#line  1672 "VBNET.ATG" 
+#line  1688 "VBNET.ATG" 
 				op = BinaryOperatorType.ExclusiveOr; 
 			}
 			ConjunctionExpr(
-#line  1674 "VBNET.ATG" 
+#line  1690 "VBNET.ATG" 
 out expr);
 
-#line  1674 "VBNET.ATG" 
+#line  1690 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, op, expr);  
 		}
 	}
 
 	void AssignmentOperator(
-#line  1529 "VBNET.ATG" 
+#line  1545 "VBNET.ATG" 
 out AssignmentOperatorType op) {
 
-#line  1530 "VBNET.ATG" 
+#line  1546 "VBNET.ATG" 
 		op = AssignmentOperatorType.None; 
 		switch (la.kind) {
 		case 11: {
 			lexer.NextToken();
 
-#line  1531 "VBNET.ATG" 
+#line  1547 "VBNET.ATG" 
 			op = AssignmentOperatorType.Assign; 
 			break;
 		}
 		case 41: {
 			lexer.NextToken();
 
-#line  1532 "VBNET.ATG" 
+#line  1548 "VBNET.ATG" 
 			op = AssignmentOperatorType.ConcatString; 
 			break;
 		}
 		case 33: {
 			lexer.NextToken();
 
-#line  1533 "VBNET.ATG" 
+#line  1549 "VBNET.ATG" 
 			op = AssignmentOperatorType.Add; 
 			break;
 		}
 		case 35: {
 			lexer.NextToken();
 
-#line  1534 "VBNET.ATG" 
+#line  1550 "VBNET.ATG" 
 			op = AssignmentOperatorType.Subtract; 
 			break;
 		}
 		case 36: {
 			lexer.NextToken();
 
-#line  1535 "VBNET.ATG" 
+#line  1551 "VBNET.ATG" 
 			op = AssignmentOperatorType.Multiply; 
 			break;
 		}
 		case 37: {
 			lexer.NextToken();
 
-#line  1536 "VBNET.ATG" 
+#line  1552 "VBNET.ATG" 
 			op = AssignmentOperatorType.Divide; 
 			break;
 		}
 		case 38: {
 			lexer.NextToken();
 
-#line  1537 "VBNET.ATG" 
+#line  1553 "VBNET.ATG" 
 			op = AssignmentOperatorType.DivideInteger; 
 			break;
 		}
 		case 34: {
 			lexer.NextToken();
 
-#line  1538 "VBNET.ATG" 
+#line  1554 "VBNET.ATG" 
 			op = AssignmentOperatorType.Power; 
 			break;
 		}
 		case 39: {
 			lexer.NextToken();
 
-#line  1539 "VBNET.ATG" 
+#line  1555 "VBNET.ATG" 
 			op = AssignmentOperatorType.ShiftLeft; 
 			break;
 		}
 		case 40: {
 			lexer.NextToken();
 
-#line  1540 "VBNET.ATG" 
+#line  1556 "VBNET.ATG" 
 			op = AssignmentOperatorType.ShiftRight; 
 			break;
 		}
@@ -3467,36 +3479,36 @@ out AssignmentOperatorType op) {
 	}
 
 	void SimpleExpr(
-#line  1544 "VBNET.ATG" 
+#line  1560 "VBNET.ATG" 
 out Expression pexpr) {
 		SimpleNonInvocationExpression(
-#line  1546 "VBNET.ATG" 
+#line  1562 "VBNET.ATG" 
 out pexpr);
 		while (la.kind == 10 || la.kind == 24) {
 			if (la.kind == 10) {
 
-#line  1547 "VBNET.ATG" 
+#line  1563 "VBNET.ATG" 
 				string name; 
 				lexer.NextToken();
 				IdentifierOrKeyword(
-#line  1548 "VBNET.ATG" 
+#line  1564 "VBNET.ATG" 
 out name);
 
-#line  1548 "VBNET.ATG" 
+#line  1564 "VBNET.ATG" 
 				pexpr = new FieldReferenceExpression(pexpr, name); 
 			} else {
 				InvocationExpression(
-#line  1549 "VBNET.ATG" 
+#line  1565 "VBNET.ATG" 
 ref pexpr);
 			}
 		}
 	}
 
 	void SimpleNonInvocationExpression(
-#line  1553 "VBNET.ATG" 
+#line  1569 "VBNET.ATG" 
 out Expression pexpr) {
 
-#line  1555 "VBNET.ATG" 
+#line  1571 "VBNET.ATG" 
 		Expression expr;
 		TypeReference type = null;
 		string name = String.Empty;
@@ -3507,143 +3519,143 @@ out Expression pexpr) {
 			case 3: {
 				lexer.NextToken();
 
-#line  1563 "VBNET.ATG" 
+#line  1579 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(t.literalValue, t.val);  
 				break;
 			}
 			case 4: {
 				lexer.NextToken();
 
-#line  1564 "VBNET.ATG" 
+#line  1580 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(t.literalValue, t.val);  
 				break;
 			}
 			case 7: {
 				lexer.NextToken();
 
-#line  1565 "VBNET.ATG" 
+#line  1581 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(t.literalValue, t.val);  
 				break;
 			}
 			case 6: {
 				lexer.NextToken();
 
-#line  1566 "VBNET.ATG" 
+#line  1582 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(t.literalValue, t.val);  
 				break;
 			}
 			case 5: {
 				lexer.NextToken();
 
-#line  1567 "VBNET.ATG" 
+#line  1583 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(t.literalValue, t.val);  
 				break;
 			}
 			case 9: {
 				lexer.NextToken();
 
-#line  1568 "VBNET.ATG" 
+#line  1584 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(t.literalValue, t.val);  
 				break;
 			}
 			case 8: {
 				lexer.NextToken();
 
-#line  1569 "VBNET.ATG" 
+#line  1585 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(t.literalValue, t.val);  
 				break;
 			}
 			case 173: {
 				lexer.NextToken();
 
-#line  1571 "VBNET.ATG" 
+#line  1587 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(true, "true");  
 				break;
 			}
 			case 96: {
 				lexer.NextToken();
 
-#line  1572 "VBNET.ATG" 
+#line  1588 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(false, "false"); 
 				break;
 			}
 			case 130: {
 				lexer.NextToken();
 
-#line  1573 "VBNET.ATG" 
+#line  1589 "VBNET.ATG" 
 				pexpr = new PrimitiveExpression(null, "null");  
 				break;
 			}
 			case 24: {
 				lexer.NextToken();
 				Expr(
-#line  1574 "VBNET.ATG" 
+#line  1590 "VBNET.ATG" 
 out expr);
 				Expect(25);
 
-#line  1574 "VBNET.ATG" 
+#line  1590 "VBNET.ATG" 
 				pexpr = new ParenthesizedExpression(expr); 
 				break;
 			}
 			case 2: case 47: case 49: case 50: case 51: case 70: case 144: case 169: case 176: case 177: case 204: {
 				Identifier();
 
-#line  1575 "VBNET.ATG" 
+#line  1591 "VBNET.ATG" 
 				pexpr = new IdentifierExpression(t.val); 
 				break;
 			}
 			case 52: case 54: case 65: case 76: case 77: case 84: case 111: case 117: case 133: case 159: case 160: case 165: case 190: case 191: case 192: case 193: {
 
-#line  1576 "VBNET.ATG" 
+#line  1592 "VBNET.ATG" 
 				string val = String.Empty; 
 				if (StartOf(10)) {
 					PrimitiveTypeName(
-#line  1577 "VBNET.ATG" 
+#line  1593 "VBNET.ATG" 
 out val);
 				} else if (la.kind == 133) {
 					lexer.NextToken();
 
-#line  1577 "VBNET.ATG" 
+#line  1593 "VBNET.ATG" 
 					val = "Object"; 
 				} else SynErr(240);
 				Expect(10);
 
-#line  1578 "VBNET.ATG" 
+#line  1594 "VBNET.ATG" 
 				t.val = ""; 
 				Identifier();
 
-#line  1578 "VBNET.ATG" 
+#line  1594 "VBNET.ATG" 
 				pexpr = new FieldReferenceExpression(new TypeReferenceExpression(val), t.val); 
 				break;
 			}
 			case 119: {
 				lexer.NextToken();
 
-#line  1579 "VBNET.ATG" 
+#line  1595 "VBNET.ATG" 
 				pexpr = new ThisReferenceExpression(); 
 				break;
 			}
 			case 124: case 125: {
 
-#line  1580 "VBNET.ATG" 
+#line  1596 "VBNET.ATG" 
 				Expression retExpr = null; 
 				if (la.kind == 124) {
 					lexer.NextToken();
 
-#line  1581 "VBNET.ATG" 
+#line  1597 "VBNET.ATG" 
 					retExpr = new BaseReferenceExpression(); 
 				} else if (la.kind == 125) {
 					lexer.NextToken();
 
-#line  1582 "VBNET.ATG" 
+#line  1598 "VBNET.ATG" 
 					retExpr = new ClassReferenceExpression(); 
 				} else SynErr(241);
 				Expect(10);
 				IdentifierOrKeyword(
-#line  1584 "VBNET.ATG" 
+#line  1600 "VBNET.ATG" 
 out name);
 
-#line  1584 "VBNET.ATG" 
+#line  1600 "VBNET.ATG" 
 				pexpr = new FieldReferenceExpression(retExpr, name); 
 				break;
 			}
@@ -3652,77 +3664,77 @@ out name);
 				Expect(10);
 				Identifier();
 
-#line  1586 "VBNET.ATG" 
+#line  1602 "VBNET.ATG" 
 				type = new TypeReference(t.val ?? ""); 
 
-#line  1588 "VBNET.ATG" 
+#line  1604 "VBNET.ATG" 
 				type.IsGlobal = true; 
 
-#line  1589 "VBNET.ATG" 
+#line  1605 "VBNET.ATG" 
 				pexpr = new TypeReferenceExpression(type); 
 				break;
 			}
 			case 127: {
 				ObjectCreateExpression(
-#line  1590 "VBNET.ATG" 
+#line  1606 "VBNET.ATG" 
 out expr);
 
-#line  1590 "VBNET.ATG" 
+#line  1606 "VBNET.ATG" 
 				pexpr = expr; 
 				break;
 			}
 			case 75: case 82: case 199: {
 
-#line  1592 "VBNET.ATG" 
+#line  1608 "VBNET.ATG" 
 				CastType castType = CastType.Cast; 
 				if (la.kind == 82) {
 					lexer.NextToken();
 				} else if (la.kind == 75) {
 					lexer.NextToken();
 
-#line  1594 "VBNET.ATG" 
+#line  1610 "VBNET.ATG" 
 					castType = CastType.Conversion; 
 				} else if (la.kind == 199) {
 					lexer.NextToken();
 
-#line  1595 "VBNET.ATG" 
+#line  1611 "VBNET.ATG" 
 					castType = CastType.TryCast; 
 				} else SynErr(242);
 				Expect(24);
 				Expr(
-#line  1597 "VBNET.ATG" 
+#line  1613 "VBNET.ATG" 
 out expr);
 				Expect(12);
 				TypeName(
-#line  1597 "VBNET.ATG" 
+#line  1613 "VBNET.ATG" 
 out type);
 				Expect(25);
 
-#line  1598 "VBNET.ATG" 
+#line  1614 "VBNET.ATG" 
 				pexpr = new CastExpression(type, expr, castType); 
 				break;
 			}
 			case 59: case 60: case 61: case 62: case 63: case 64: case 66: case 68: case 69: case 72: case 73: case 74: case 194: case 195: case 196: case 197: {
 				CastTarget(
-#line  1599 "VBNET.ATG" 
+#line  1615 "VBNET.ATG" 
 out type);
 				Expect(24);
 				Expr(
-#line  1599 "VBNET.ATG" 
+#line  1615 "VBNET.ATG" 
 out expr);
 				Expect(25);
 
-#line  1599 "VBNET.ATG" 
+#line  1615 "VBNET.ATG" 
 				pexpr = new CastExpression(type, expr, CastType.PrimitiveConversion); 
 				break;
 			}
 			case 43: {
 				lexer.NextToken();
 				Expr(
-#line  1600 "VBNET.ATG" 
+#line  1616 "VBNET.ATG" 
 out expr);
 
-#line  1600 "VBNET.ATG" 
+#line  1616 "VBNET.ATG" 
 				pexpr = new AddressOfExpression(expr); 
 				break;
 			}
@@ -3730,25 +3742,25 @@ out expr);
 				lexer.NextToken();
 				Expect(24);
 				GetTypeTypeName(
-#line  1601 "VBNET.ATG" 
+#line  1617 "VBNET.ATG" 
 out type);
 				Expect(25);
 
-#line  1601 "VBNET.ATG" 
+#line  1617 "VBNET.ATG" 
 				pexpr = new TypeOfExpression(type); 
 				break;
 			}
 			case 175: {
 				lexer.NextToken();
 				SimpleExpr(
-#line  1602 "VBNET.ATG" 
+#line  1618 "VBNET.ATG" 
 out expr);
 				Expect(113);
 				TypeName(
-#line  1602 "VBNET.ATG" 
+#line  1618 "VBNET.ATG" 
 out type);
 
-#line  1602 "VBNET.ATG" 
+#line  1618 "VBNET.ATG" 
 				pexpr = new TypeOfIsExpression(expr, type); 
 				break;
 			}
@@ -3756,49 +3768,49 @@ out type);
 		} else if (la.kind == 10) {
 			lexer.NextToken();
 			IdentifierOrKeyword(
-#line  1606 "VBNET.ATG" 
+#line  1622 "VBNET.ATG" 
 out name);
 
-#line  1606 "VBNET.ATG" 
+#line  1622 "VBNET.ATG" 
 			pexpr = new FieldReferenceExpression(null, name);
 		} else SynErr(243);
 	}
 
 	void IdentifierOrKeyword(
-#line  2776 "VBNET.ATG" 
+#line  2792 "VBNET.ATG" 
 out string name) {
 
-#line  2778 "VBNET.ATG" 
+#line  2794 "VBNET.ATG" 
 		lexer.NextToken(); name = t.val;  
 	}
 
 	void InvocationExpression(
-#line  1610 "VBNET.ATG" 
+#line  1626 "VBNET.ATG" 
 ref Expression pexpr) {
 
-#line  1611 "VBNET.ATG" 
+#line  1627 "VBNET.ATG" 
 		List<TypeReference> typeParameters = new List<TypeReference>();
 		List<Expression> parameters = null;
 		TypeReference type; 
 		Expect(24);
 
-#line  1615 "VBNET.ATG" 
+#line  1631 "VBNET.ATG" 
 		Location start = t.Location; 
 		if (la.kind == 200) {
 			lexer.NextToken();
 			TypeName(
-#line  1617 "VBNET.ATG" 
+#line  1633 "VBNET.ATG" 
 out type);
 
-#line  1617 "VBNET.ATG" 
+#line  1633 "VBNET.ATG" 
 			if (type != null) typeParameters.Add(type); 
 			while (la.kind == 12) {
 				lexer.NextToken();
 				TypeName(
-#line  1620 "VBNET.ATG" 
+#line  1636 "VBNET.ATG" 
 out type);
 
-#line  1620 "VBNET.ATG" 
+#line  1636 "VBNET.ATG" 
 				if (type != null) typeParameters.Add(type); 
 			}
 			Expect(25);
@@ -3806,141 +3818,141 @@ out type);
 				lexer.NextToken();
 				Identifier();
 
-#line  1625 "VBNET.ATG" 
+#line  1641 "VBNET.ATG" 
 				pexpr = new FieldReferenceExpression(GetTypeReferenceExpression(pexpr, typeParameters), t.val); 
 			} else if (la.kind == 24) {
 				lexer.NextToken();
 				ArgumentList(
-#line  1627 "VBNET.ATG" 
+#line  1643 "VBNET.ATG" 
 out parameters);
 				Expect(25);
 
-#line  1629 "VBNET.ATG" 
+#line  1645 "VBNET.ATG" 
 				pexpr = new InvocationExpression(pexpr, parameters, typeParameters); 
 			} else SynErr(244);
 		} else if (StartOf(30)) {
 			ArgumentList(
-#line  1631 "VBNET.ATG" 
+#line  1647 "VBNET.ATG" 
 out parameters);
 			Expect(25);
 
-#line  1633 "VBNET.ATG" 
+#line  1649 "VBNET.ATG" 
 			pexpr = new InvocationExpression(pexpr, parameters, typeParameters); 
 		} else SynErr(245);
 
-#line  1635 "VBNET.ATG" 
+#line  1651 "VBNET.ATG" 
 		pexpr.StartLocation = start; pexpr.EndLocation = t.Location; 
 	}
 
 	void PrimitiveTypeName(
-#line  2783 "VBNET.ATG" 
+#line  2799 "VBNET.ATG" 
 out string type) {
 
-#line  2784 "VBNET.ATG" 
+#line  2800 "VBNET.ATG" 
 		type = String.Empty; 
 		switch (la.kind) {
 		case 52: {
 			lexer.NextToken();
 
-#line  2785 "VBNET.ATG" 
+#line  2801 "VBNET.ATG" 
 			type = "Boolean"; 
 			break;
 		}
 		case 76: {
 			lexer.NextToken();
 
-#line  2786 "VBNET.ATG" 
+#line  2802 "VBNET.ATG" 
 			type = "Date"; 
 			break;
 		}
 		case 65: {
 			lexer.NextToken();
 
-#line  2787 "VBNET.ATG" 
+#line  2803 "VBNET.ATG" 
 			type = "Char"; 
 			break;
 		}
 		case 165: {
 			lexer.NextToken();
 
-#line  2788 "VBNET.ATG" 
+#line  2804 "VBNET.ATG" 
 			type = "String"; 
 			break;
 		}
 		case 77: {
 			lexer.NextToken();
 
-#line  2789 "VBNET.ATG" 
+#line  2805 "VBNET.ATG" 
 			type = "Decimal"; 
 			break;
 		}
 		case 54: {
 			lexer.NextToken();
 
-#line  2790 "VBNET.ATG" 
+#line  2806 "VBNET.ATG" 
 			type = "Byte"; 
 			break;
 		}
 		case 159: {
 			lexer.NextToken();
 
-#line  2791 "VBNET.ATG" 
+#line  2807 "VBNET.ATG" 
 			type = "Short"; 
 			break;
 		}
 		case 111: {
 			lexer.NextToken();
 
-#line  2792 "VBNET.ATG" 
+#line  2808 "VBNET.ATG" 
 			type = "Integer"; 
 			break;
 		}
 		case 117: {
 			lexer.NextToken();
 
-#line  2793 "VBNET.ATG" 
+#line  2809 "VBNET.ATG" 
 			type = "Long"; 
 			break;
 		}
 		case 160: {
 			lexer.NextToken();
 
-#line  2794 "VBNET.ATG" 
+#line  2810 "VBNET.ATG" 
 			type = "Single"; 
 			break;
 		}
 		case 84: {
 			lexer.NextToken();
 
-#line  2795 "VBNET.ATG" 
+#line  2811 "VBNET.ATG" 
 			type = "Double"; 
 			break;
 		}
 		case 191: {
 			lexer.NextToken();
 
-#line  2796 "VBNET.ATG" 
+#line  2812 "VBNET.ATG" 
 			type = "UInteger"; 
 			break;
 		}
 		case 192: {
 			lexer.NextToken();
 
-#line  2797 "VBNET.ATG" 
+#line  2813 "VBNET.ATG" 
 			type = "ULong"; 
 			break;
 		}
 		case 193: {
 			lexer.NextToken();
 
-#line  2798 "VBNET.ATG" 
+#line  2814 "VBNET.ATG" 
 			type = "UShort"; 
 			break;
 		}
 		case 190: {
 			lexer.NextToken();
 
-#line  2799 "VBNET.ATG" 
+#line  2815 "VBNET.ATG" 
 			type = "SByte"; 
 			break;
 		}
@@ -3949,122 +3961,122 @@ out string type) {
 	}
 
 	void CastTarget(
-#line  1640 "VBNET.ATG" 
+#line  1656 "VBNET.ATG" 
 out TypeReference type) {
 
-#line  1642 "VBNET.ATG" 
+#line  1658 "VBNET.ATG" 
 		type = null;
 		
 		switch (la.kind) {
 		case 59: {
 			lexer.NextToken();
 
-#line  1644 "VBNET.ATG" 
+#line  1660 "VBNET.ATG" 
 			type = new TypeReference("System.Boolean"); 
 			break;
 		}
 		case 60: {
 			lexer.NextToken();
 
-#line  1645 "VBNET.ATG" 
+#line  1661 "VBNET.ATG" 
 			type = new TypeReference("System.Byte"); 
 			break;
 		}
 		case 194: {
 			lexer.NextToken();
 
-#line  1646 "VBNET.ATG" 
+#line  1662 "VBNET.ATG" 
 			type = new TypeReference("System.SByte"); 
 			break;
 		}
 		case 61: {
 			lexer.NextToken();
 
-#line  1647 "VBNET.ATG" 
+#line  1663 "VBNET.ATG" 
 			type = new TypeReference("System.Char"); 
 			break;
 		}
 		case 62: {
 			lexer.NextToken();
 
-#line  1648 "VBNET.ATG" 
+#line  1664 "VBNET.ATG" 
 			type = new TypeReference("System.DateTime"); 
 			break;
 		}
 		case 64: {
 			lexer.NextToken();
 
-#line  1649 "VBNET.ATG" 
+#line  1665 "VBNET.ATG" 
 			type = new TypeReference("System.Decimal"); 
 			break;
 		}
 		case 63: {
 			lexer.NextToken();
 
-#line  1650 "VBNET.ATG" 
+#line  1666 "VBNET.ATG" 
 			type = new TypeReference("System.Double"); 
 			break;
 		}
 		case 72: {
 			lexer.NextToken();
 
-#line  1651 "VBNET.ATG" 
+#line  1667 "VBNET.ATG" 
 			type = new TypeReference("System.Int16"); 
 			break;
 		}
 		case 66: {
 			lexer.NextToken();
 
-#line  1652 "VBNET.ATG" 
+#line  1668 "VBNET.ATG" 
 			type = new TypeReference("System.Int32"); 
 			break;
 		}
 		case 68: {
 			lexer.NextToken();
 
-#line  1653 "VBNET.ATG" 
+#line  1669 "VBNET.ATG" 
 			type = new TypeReference("System.Int64"); 
 			break;
 		}
 		case 195: {
 			lexer.NextToken();
 
-#line  1654 "VBNET.ATG" 
+#line  1670 "VBNET.ATG" 
 			type = new TypeReference("System.UInt16"); 
 			break;
 		}
 		case 196: {
 			lexer.NextToken();
 
-#line  1655 "VBNET.ATG" 
+#line  1671 "VBNET.ATG" 
 			type = new TypeReference("System.UInt32"); 
 			break;
 		}
 		case 197: {
 			lexer.NextToken();
 
-#line  1656 "VBNET.ATG" 
+#line  1672 "VBNET.ATG" 
 			type = new TypeReference("System.UInt64"); 
 			break;
 		}
 		case 69: {
 			lexer.NextToken();
 
-#line  1657 "VBNET.ATG" 
+#line  1673 "VBNET.ATG" 
 			type = new TypeReference("System.Object"); 
 			break;
 		}
 		case 73: {
 			lexer.NextToken();
 
-#line  1658 "VBNET.ATG" 
+#line  1674 "VBNET.ATG" 
 			type = new TypeReference("System.Single"); 
 			break;
 		}
 		case 74: {
 			lexer.NextToken();
 
-#line  1659 "VBNET.ATG" 
+#line  1675 "VBNET.ATG" 
 			type = new TypeReference("System.String"); 
 			break;
 		}
@@ -4073,19 +4085,19 @@ out TypeReference type) {
 	}
 
 	void GetTypeTypeName(
-#line  1917 "VBNET.ATG" 
+#line  1933 "VBNET.ATG" 
 out TypeReference typeref) {
 
-#line  1918 "VBNET.ATG" 
+#line  1934 "VBNET.ATG" 
 		ArrayList rank = null; 
 		NonArrayTypeName(
-#line  1920 "VBNET.ATG" 
+#line  1936 "VBNET.ATG" 
 out typeref, true);
 		ArrayTypeModifiers(
-#line  1921 "VBNET.ATG" 
+#line  1937 "VBNET.ATG" 
 out rank);
 
-#line  1922 "VBNET.ATG" 
+#line  1938 "VBNET.ATG" 
 		if (rank != null && typeref != null) {
 		typeref.RankSpecifier = (int[])rank.ToArray(typeof(int));
 		}
@@ -4093,348 +4105,348 @@ out rank);
 	}
 
 	void ArgumentList(
-#line  1852 "VBNET.ATG" 
+#line  1868 "VBNET.ATG" 
 out List<Expression> arguments) {
 
-#line  1854 "VBNET.ATG" 
+#line  1870 "VBNET.ATG" 
 		arguments = new List<Expression>();
 		Expression expr = null;
 		
 		if (StartOf(27)) {
 			Argument(
-#line  1857 "VBNET.ATG" 
+#line  1873 "VBNET.ATG" 
 out expr);
 		}
 		while (la.kind == 12) {
 			lexer.NextToken();
 
-#line  1858 "VBNET.ATG" 
+#line  1874 "VBNET.ATG" 
 			arguments.Add(expr ?? Expression.Null); expr = null; 
 			if (StartOf(27)) {
 				Argument(
-#line  1859 "VBNET.ATG" 
+#line  1875 "VBNET.ATG" 
 out expr);
 			}
 
-#line  1860 "VBNET.ATG" 
+#line  1876 "VBNET.ATG" 
 			if (expr == null) expr = Expression.Null; 
 		}
 
-#line  1862 "VBNET.ATG" 
+#line  1878 "VBNET.ATG" 
 		if (expr != null) arguments.Add(expr); 
 	}
 
 	void ConjunctionExpr(
-#line  1678 "VBNET.ATG" 
+#line  1694 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1680 "VBNET.ATG" 
+#line  1696 "VBNET.ATG" 
 		Expression expr;
 		BinaryOperatorType op = BinaryOperatorType.None;
 		
 		NotExpr(
-#line  1683 "VBNET.ATG" 
+#line  1699 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 45 || la.kind == 46) {
 			if (la.kind == 45) {
 				lexer.NextToken();
 
-#line  1686 "VBNET.ATG" 
+#line  1702 "VBNET.ATG" 
 				op = BinaryOperatorType.BitwiseAnd; 
 			} else {
 				lexer.NextToken();
 
-#line  1687 "VBNET.ATG" 
+#line  1703 "VBNET.ATG" 
 				op = BinaryOperatorType.LogicalAnd; 
 			}
 			NotExpr(
-#line  1689 "VBNET.ATG" 
+#line  1705 "VBNET.ATG" 
 out expr);
 
-#line  1689 "VBNET.ATG" 
+#line  1705 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, op, expr);  
 		}
 	}
 
 	void NotExpr(
-#line  1693 "VBNET.ATG" 
+#line  1709 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1694 "VBNET.ATG" 
+#line  1710 "VBNET.ATG" 
 		UnaryOperatorType uop = UnaryOperatorType.None; 
 		while (la.kind == 129) {
 			lexer.NextToken();
 
-#line  1695 "VBNET.ATG" 
+#line  1711 "VBNET.ATG" 
 			uop = UnaryOperatorType.Not; 
 		}
 		ComparisonExpr(
-#line  1696 "VBNET.ATG" 
+#line  1712 "VBNET.ATG" 
 out outExpr);
 
-#line  1697 "VBNET.ATG" 
+#line  1713 "VBNET.ATG" 
 		if (uop != UnaryOperatorType.None)
 		outExpr = new UnaryOperatorExpression(outExpr, uop);
 		
 	}
 
 	void ComparisonExpr(
-#line  1702 "VBNET.ATG" 
+#line  1718 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1704 "VBNET.ATG" 
+#line  1720 "VBNET.ATG" 
 		Expression expr;
 		BinaryOperatorType op = BinaryOperatorType.None;
 		
 		ShiftExpr(
-#line  1707 "VBNET.ATG" 
+#line  1723 "VBNET.ATG" 
 out outExpr);
 		while (StartOf(31)) {
 			switch (la.kind) {
 			case 27: {
 				lexer.NextToken();
 
-#line  1710 "VBNET.ATG" 
+#line  1726 "VBNET.ATG" 
 				op = BinaryOperatorType.LessThan; 
 				break;
 			}
 			case 26: {
 				lexer.NextToken();
 
-#line  1711 "VBNET.ATG" 
+#line  1727 "VBNET.ATG" 
 				op = BinaryOperatorType.GreaterThan; 
 				break;
 			}
 			case 30: {
 				lexer.NextToken();
 
-#line  1712 "VBNET.ATG" 
+#line  1728 "VBNET.ATG" 
 				op = BinaryOperatorType.LessThanOrEqual; 
 				break;
 			}
 			case 29: {
 				lexer.NextToken();
 
-#line  1713 "VBNET.ATG" 
+#line  1729 "VBNET.ATG" 
 				op = BinaryOperatorType.GreaterThanOrEqual; 
 				break;
 			}
 			case 28: {
 				lexer.NextToken();
 
-#line  1714 "VBNET.ATG" 
+#line  1730 "VBNET.ATG" 
 				op = BinaryOperatorType.InEquality; 
 				break;
 			}
 			case 11: {
 				lexer.NextToken();
 
-#line  1715 "VBNET.ATG" 
+#line  1731 "VBNET.ATG" 
 				op = BinaryOperatorType.Equality; 
 				break;
 			}
 			case 116: {
 				lexer.NextToken();
 
-#line  1716 "VBNET.ATG" 
+#line  1732 "VBNET.ATG" 
 				op = BinaryOperatorType.Like; 
 				break;
 			}
 			case 113: {
 				lexer.NextToken();
 
-#line  1717 "VBNET.ATG" 
+#line  1733 "VBNET.ATG" 
 				op = BinaryOperatorType.ReferenceEquality; 
 				break;
 			}
 			case 189: {
 				lexer.NextToken();
 
-#line  1718 "VBNET.ATG" 
+#line  1734 "VBNET.ATG" 
 				op = BinaryOperatorType.ReferenceInequality; 
 				break;
 			}
 			}
 			if (StartOf(32)) {
 				ShiftExpr(
-#line  1721 "VBNET.ATG" 
+#line  1737 "VBNET.ATG" 
 out expr);
 
-#line  1721 "VBNET.ATG" 
+#line  1737 "VBNET.ATG" 
 				outExpr = new BinaryOperatorExpression(outExpr, op, expr);  
 			} else if (la.kind == 129) {
 				lexer.NextToken();
 				ShiftExpr(
-#line  1724 "VBNET.ATG" 
+#line  1740 "VBNET.ATG" 
 out expr);
 
-#line  1724 "VBNET.ATG" 
+#line  1740 "VBNET.ATG" 
 				outExpr = new BinaryOperatorExpression(outExpr, op, new UnaryOperatorExpression(expr, UnaryOperatorType.Not));  
 			} else SynErr(248);
 		}
 	}
 
 	void ShiftExpr(
-#line  1729 "VBNET.ATG" 
+#line  1745 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1731 "VBNET.ATG" 
+#line  1747 "VBNET.ATG" 
 		Expression expr;
 		BinaryOperatorType op = BinaryOperatorType.None;
 		
 		ConcatenationExpr(
-#line  1734 "VBNET.ATG" 
+#line  1750 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 31 || la.kind == 32) {
 			if (la.kind == 31) {
 				lexer.NextToken();
 
-#line  1737 "VBNET.ATG" 
+#line  1753 "VBNET.ATG" 
 				op = BinaryOperatorType.ShiftLeft; 
 			} else {
 				lexer.NextToken();
 
-#line  1738 "VBNET.ATG" 
+#line  1754 "VBNET.ATG" 
 				op = BinaryOperatorType.ShiftRight; 
 			}
 			ConcatenationExpr(
-#line  1740 "VBNET.ATG" 
+#line  1756 "VBNET.ATG" 
 out expr);
 
-#line  1740 "VBNET.ATG" 
+#line  1756 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, op, expr);  
 		}
 	}
 
 	void ConcatenationExpr(
-#line  1744 "VBNET.ATG" 
+#line  1760 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1745 "VBNET.ATG" 
+#line  1761 "VBNET.ATG" 
 		Expression expr; 
 		AdditiveExpr(
-#line  1747 "VBNET.ATG" 
+#line  1763 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 19) {
 			lexer.NextToken();
 			AdditiveExpr(
-#line  1747 "VBNET.ATG" 
+#line  1763 "VBNET.ATG" 
 out expr);
 
-#line  1747 "VBNET.ATG" 
+#line  1763 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, BinaryOperatorType.Concat, expr);  
 		}
 	}
 
 	void AdditiveExpr(
-#line  1750 "VBNET.ATG" 
+#line  1766 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1752 "VBNET.ATG" 
+#line  1768 "VBNET.ATG" 
 		Expression expr;
 		BinaryOperatorType op = BinaryOperatorType.None;
 		
 		ModuloExpr(
-#line  1755 "VBNET.ATG" 
+#line  1771 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 14 || la.kind == 15) {
 			if (la.kind == 14) {
 				lexer.NextToken();
 
-#line  1758 "VBNET.ATG" 
+#line  1774 "VBNET.ATG" 
 				op = BinaryOperatorType.Add; 
 			} else {
 				lexer.NextToken();
 
-#line  1759 "VBNET.ATG" 
+#line  1775 "VBNET.ATG" 
 				op = BinaryOperatorType.Subtract; 
 			}
 			ModuloExpr(
-#line  1761 "VBNET.ATG" 
+#line  1777 "VBNET.ATG" 
 out expr);
 
-#line  1761 "VBNET.ATG" 
+#line  1777 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, op, expr);  
 		}
 	}
 
 	void ModuloExpr(
-#line  1765 "VBNET.ATG" 
+#line  1781 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1766 "VBNET.ATG" 
+#line  1782 "VBNET.ATG" 
 		Expression expr; 
 		IntegerDivisionExpr(
-#line  1768 "VBNET.ATG" 
+#line  1784 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 120) {
 			lexer.NextToken();
 			IntegerDivisionExpr(
-#line  1768 "VBNET.ATG" 
+#line  1784 "VBNET.ATG" 
 out expr);
 
-#line  1768 "VBNET.ATG" 
+#line  1784 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, BinaryOperatorType.Modulus, expr);  
 		}
 	}
 
 	void IntegerDivisionExpr(
-#line  1771 "VBNET.ATG" 
+#line  1787 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1772 "VBNET.ATG" 
+#line  1788 "VBNET.ATG" 
 		Expression expr; 
 		MultiplicativeExpr(
-#line  1774 "VBNET.ATG" 
+#line  1790 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 18) {
 			lexer.NextToken();
 			MultiplicativeExpr(
-#line  1774 "VBNET.ATG" 
+#line  1790 "VBNET.ATG" 
 out expr);
 
-#line  1774 "VBNET.ATG" 
+#line  1790 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, BinaryOperatorType.DivideInteger, expr);  
 		}
 	}
 
 	void MultiplicativeExpr(
-#line  1777 "VBNET.ATG" 
+#line  1793 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1779 "VBNET.ATG" 
+#line  1795 "VBNET.ATG" 
 		Expression expr;
 		BinaryOperatorType op = BinaryOperatorType.None;
 		
 		UnaryExpr(
-#line  1782 "VBNET.ATG" 
+#line  1798 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 16 || la.kind == 17) {
 			if (la.kind == 16) {
 				lexer.NextToken();
 
-#line  1785 "VBNET.ATG" 
+#line  1801 "VBNET.ATG" 
 				op = BinaryOperatorType.Multiply; 
 			} else {
 				lexer.NextToken();
 
-#line  1786 "VBNET.ATG" 
+#line  1802 "VBNET.ATG" 
 				op = BinaryOperatorType.Divide; 
 			}
 			UnaryExpr(
-#line  1788 "VBNET.ATG" 
+#line  1804 "VBNET.ATG" 
 out expr);
 
-#line  1788 "VBNET.ATG" 
+#line  1804 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, op, expr); 
 		}
 	}
 
 	void UnaryExpr(
-#line  1792 "VBNET.ATG" 
+#line  1808 "VBNET.ATG" 
 out Expression uExpr) {
 
-#line  1794 "VBNET.ATG" 
+#line  1810 "VBNET.ATG" 
 		Expression expr;
 		UnaryOperatorType uop = UnaryOperatorType.None;
 		bool isUOp = false;
@@ -4443,25 +4455,25 @@ out Expression uExpr) {
 			if (la.kind == 14) {
 				lexer.NextToken();
 
-#line  1798 "VBNET.ATG" 
+#line  1814 "VBNET.ATG" 
 				uop = UnaryOperatorType.Plus; isUOp = true; 
 			} else if (la.kind == 15) {
 				lexer.NextToken();
 
-#line  1799 "VBNET.ATG" 
+#line  1815 "VBNET.ATG" 
 				uop = UnaryOperatorType.Minus; isUOp = true; 
 			} else {
 				lexer.NextToken();
 
-#line  1800 "VBNET.ATG" 
+#line  1816 "VBNET.ATG" 
 				uop = UnaryOperatorType.Star;  isUOp = true;
 			}
 		}
 		ExponentiationExpr(
-#line  1802 "VBNET.ATG" 
+#line  1818 "VBNET.ATG" 
 out expr);
 
-#line  1804 "VBNET.ATG" 
+#line  1820 "VBNET.ATG" 
 		if (isUOp) {
 		uExpr = new UnaryOperatorExpression(expr, uop);
 		} else {
@@ -4471,107 +4483,107 @@ out expr);
 	}
 
 	void ExponentiationExpr(
-#line  1812 "VBNET.ATG" 
+#line  1828 "VBNET.ATG" 
 out Expression outExpr) {
 
-#line  1813 "VBNET.ATG" 
+#line  1829 "VBNET.ATG" 
 		Expression expr; 
 		SimpleExpr(
-#line  1815 "VBNET.ATG" 
+#line  1831 "VBNET.ATG" 
 out outExpr);
 		while (la.kind == 20) {
 			lexer.NextToken();
 			SimpleExpr(
-#line  1815 "VBNET.ATG" 
+#line  1831 "VBNET.ATG" 
 out expr);
 
-#line  1815 "VBNET.ATG" 
+#line  1831 "VBNET.ATG" 
 			outExpr = new BinaryOperatorExpression(outExpr, BinaryOperatorType.Power, expr);  
 		}
 	}
 
 	void NormalOrReDimArgumentList(
-#line  1866 "VBNET.ATG" 
+#line  1882 "VBNET.ATG" 
 out List<Expression> arguments, out bool canBeNormal, out bool canBeRedim) {
 
-#line  1868 "VBNET.ATG" 
+#line  1884 "VBNET.ATG" 
 		arguments = new List<Expression>();
 		canBeNormal = true; canBeRedim = !IsNamedAssign();
 		Expression expr = null;
 		
 		if (StartOf(27)) {
 			Argument(
-#line  1873 "VBNET.ATG" 
+#line  1889 "VBNET.ATG" 
 out expr);
 			if (la.kind == 172) {
 				lexer.NextToken();
 
-#line  1874 "VBNET.ATG" 
+#line  1890 "VBNET.ATG" 
 				EnsureIsZero(expr); canBeNormal = false; 
 				Expr(
-#line  1875 "VBNET.ATG" 
+#line  1891 "VBNET.ATG" 
 out expr);
 			}
 		}
 		while (la.kind == 12) {
 			lexer.NextToken();
 
-#line  1878 "VBNET.ATG" 
+#line  1894 "VBNET.ATG" 
 			if (expr == null) canBeRedim = false; 
 
-#line  1879 "VBNET.ATG" 
+#line  1895 "VBNET.ATG" 
 			arguments.Add(expr ?? Expression.Null); expr = null; 
 
-#line  1880 "VBNET.ATG" 
+#line  1896 "VBNET.ATG" 
 			canBeRedim &= !IsNamedAssign(); 
 			if (StartOf(27)) {
 				Argument(
-#line  1881 "VBNET.ATG" 
+#line  1897 "VBNET.ATG" 
 out expr);
 				if (la.kind == 172) {
 					lexer.NextToken();
 
-#line  1882 "VBNET.ATG" 
+#line  1898 "VBNET.ATG" 
 					EnsureIsZero(expr); canBeNormal = false; 
 					Expr(
-#line  1883 "VBNET.ATG" 
+#line  1899 "VBNET.ATG" 
 out expr);
 				}
 			}
 
-#line  1885 "VBNET.ATG" 
+#line  1901 "VBNET.ATG" 
 			if (expr == null) { canBeRedim = false; expr = Expression.Null; } 
 		}
 
-#line  1887 "VBNET.ATG" 
+#line  1903 "VBNET.ATG" 
 		if (expr != null) arguments.Add(expr); else canBeRedim = false; 
 	}
 
 	void ArrayTypeModifiers(
-#line  1974 "VBNET.ATG" 
+#line  1990 "VBNET.ATG" 
 out ArrayList arrayModifiers) {
 
-#line  1976 "VBNET.ATG" 
+#line  1992 "VBNET.ATG" 
 		arrayModifiers = new ArrayList();
 		int i = 0;
 		
 		while (
-#line  1979 "VBNET.ATG" 
+#line  1995 "VBNET.ATG" 
 IsDims()) {
 			Expect(24);
 			if (la.kind == 12 || la.kind == 25) {
 				RankList(
-#line  1981 "VBNET.ATG" 
+#line  1997 "VBNET.ATG" 
 out i);
 			}
 
-#line  1983 "VBNET.ATG" 
+#line  1999 "VBNET.ATG" 
 			arrayModifiers.Add(i);
 			
 			Expect(25);
 		}
 
-#line  1988 "VBNET.ATG" 
+#line  2004 "VBNET.ATG" 
 		if(arrayModifiers.Count == 0) {
 		 arrayModifiers = null;
 		}
@@ -4579,69 +4591,69 @@ out i);
 	}
 
 	void Argument(
-#line  1891 "VBNET.ATG" 
+#line  1907 "VBNET.ATG" 
 out Expression argumentexpr) {
 
-#line  1893 "VBNET.ATG" 
+#line  1909 "VBNET.ATG" 
 		Expression expr;
 		argumentexpr = null;
 		string name;
 		
 		if (
-#line  1897 "VBNET.ATG" 
+#line  1913 "VBNET.ATG" 
 IsNamedAssign()) {
 			Identifier();
 
-#line  1897 "VBNET.ATG" 
+#line  1913 "VBNET.ATG" 
 			name = t.val;  
 			Expect(13);
 			Expect(11);
 			Expr(
-#line  1897 "VBNET.ATG" 
+#line  1913 "VBNET.ATG" 
 out expr);
 
-#line  1899 "VBNET.ATG" 
+#line  1915 "VBNET.ATG" 
 			argumentexpr = new NamedArgumentExpression(name, expr);
 			
 		} else if (StartOf(27)) {
 			Expr(
-#line  1902 "VBNET.ATG" 
+#line  1918 "VBNET.ATG" 
 out argumentexpr);
 		} else SynErr(249);
 	}
 
 	void QualIdentAndTypeArguments(
-#line  1948 "VBNET.ATG" 
+#line  1964 "VBNET.ATG" 
 out TypeReference typeref, bool canBeUnbound) {
 
-#line  1949 "VBNET.ATG" 
+#line  1965 "VBNET.ATG" 
 		string name; typeref = null; 
 		Qualident(
-#line  1951 "VBNET.ATG" 
+#line  1967 "VBNET.ATG" 
 out name);
 
-#line  1952 "VBNET.ATG" 
+#line  1968 "VBNET.ATG" 
 		typeref = new TypeReference(name); 
 		if (
-#line  1953 "VBNET.ATG" 
+#line  1969 "VBNET.ATG" 
 la.kind == Tokens.OpenParenthesis && Peek(1).kind == Tokens.Of) {
 			lexer.NextToken();
 			Expect(200);
 			if (
-#line  1955 "VBNET.ATG" 
+#line  1971 "VBNET.ATG" 
 canBeUnbound && (la.kind == Tokens.CloseParenthesis || la.kind == Tokens.Comma)) {
 
-#line  1956 "VBNET.ATG" 
+#line  1972 "VBNET.ATG" 
 				typeref.GenericTypes.Add(NullTypeReference.Instance); 
 				while (la.kind == 12) {
 					lexer.NextToken();
 
-#line  1957 "VBNET.ATG" 
+#line  1973 "VBNET.ATG" 
 					typeref.GenericTypes.Add(NullTypeReference.Instance); 
 				}
 			} else if (StartOf(6)) {
 				TypeArgumentList(
-#line  1958 "VBNET.ATG" 
+#line  1974 "VBNET.ATG" 
 typeref.GenericTypes);
 			} else SynErr(250);
 			Expect(25);
@@ -4649,48 +4661,48 @@ typeref.GenericTypes);
 	}
 
 	void TypeArgumentList(
-#line  2001 "VBNET.ATG" 
+#line  2017 "VBNET.ATG" 
 List<TypeReference> typeArguments) {
 
-#line  2003 "VBNET.ATG" 
+#line  2019 "VBNET.ATG" 
 		TypeReference typeref;
 		
 		TypeName(
-#line  2005 "VBNET.ATG" 
+#line  2021 "VBNET.ATG" 
 out typeref);
 
-#line  2005 "VBNET.ATG" 
+#line  2021 "VBNET.ATG" 
 		if (typeref != null) typeArguments.Add(typeref); 
 		while (la.kind == 12) {
 			lexer.NextToken();
 			TypeName(
-#line  2008 "VBNET.ATG" 
+#line  2024 "VBNET.ATG" 
 out typeref);
 
-#line  2008 "VBNET.ATG" 
+#line  2024 "VBNET.ATG" 
 			if (typeref != null) typeArguments.Add(typeref); 
 		}
 	}
 
 	void RankList(
-#line  1995 "VBNET.ATG" 
+#line  2011 "VBNET.ATG" 
 out int i) {
 
-#line  1996 "VBNET.ATG" 
+#line  2012 "VBNET.ATG" 
 		i = 0; 
 		while (la.kind == 12) {
 			lexer.NextToken();
 
-#line  1997 "VBNET.ATG" 
+#line  2013 "VBNET.ATG" 
 			++i; 
 		}
 	}
 
 	void Attribute(
-#line  2033 "VBNET.ATG" 
+#line  2049 "VBNET.ATG" 
 out ASTAttribute attribute) {
 
-#line  2034 "VBNET.ATG" 
+#line  2050 "VBNET.ATG" 
 		string name;
 		List<Expression> positional = new List<Expression>();
 		List<NamedArgumentExpression> named = new List<NamedArgumentExpression>();
@@ -4700,39 +4712,39 @@ out ASTAttribute attribute) {
 			Expect(10);
 		}
 		Qualident(
-#line  2039 "VBNET.ATG" 
+#line  2055 "VBNET.ATG" 
 out name);
 		if (la.kind == 24) {
 			AttributeArguments(
-#line  2040 "VBNET.ATG" 
+#line  2056 "VBNET.ATG" 
 positional, named);
 		}
 
-#line  2041 "VBNET.ATG" 
+#line  2057 "VBNET.ATG" 
 		attribute  = new ASTAttribute(name, positional, named); 
 	}
 
 	void AttributeArguments(
-#line  2045 "VBNET.ATG" 
+#line  2061 "VBNET.ATG" 
 List<Expression> positional, List<NamedArgumentExpression> named) {
 
-#line  2047 "VBNET.ATG" 
+#line  2063 "VBNET.ATG" 
 		bool nameFound = false;
 		string name = "";
 		Expression expr;
 		
 		Expect(24);
 		if (
-#line  2053 "VBNET.ATG" 
+#line  2069 "VBNET.ATG" 
 IsNotClosingParenthesis()) {
 			if (
-#line  2055 "VBNET.ATG" 
+#line  2071 "VBNET.ATG" 
 IsNamedAssign()) {
 
-#line  2055 "VBNET.ATG" 
+#line  2071 "VBNET.ATG" 
 				nameFound = true; 
 				IdentifierOrKeyword(
-#line  2056 "VBNET.ATG" 
+#line  2072 "VBNET.ATG" 
 out name);
 				if (la.kind == 13) {
 					lexer.NextToken();
@@ -4740,10 +4752,10 @@ out name);
 				Expect(11);
 			}
 			Expr(
-#line  2058 "VBNET.ATG" 
+#line  2074 "VBNET.ATG" 
 out expr);
 
-#line  2060 "VBNET.ATG" 
+#line  2076 "VBNET.ATG" 
 			if (expr != null) {
 			if (string.IsNullOrEmpty(name)) { positional.Add(expr); }
 			else { named.Add(new NamedArgumentExpression(name, expr)); name = ""; }
@@ -4752,13 +4764,13 @@ out expr);
 			while (la.kind == 12) {
 				lexer.NextToken();
 				if (
-#line  2068 "VBNET.ATG" 
+#line  2084 "VBNET.ATG" 
 IsNamedAssign()) {
 
-#line  2068 "VBNET.ATG" 
+#line  2084 "VBNET.ATG" 
 					nameFound = true; 
 					IdentifierOrKeyword(
-#line  2069 "VBNET.ATG" 
+#line  2085 "VBNET.ATG" 
 out name);
 					if (la.kind == 13) {
 						lexer.NextToken();
@@ -4766,14 +4778,14 @@ out name);
 					Expect(11);
 				} else if (StartOf(27)) {
 
-#line  2071 "VBNET.ATG" 
+#line  2087 "VBNET.ATG" 
 					if (nameFound) Error("no positional argument after named argument"); 
 				} else SynErr(251);
 				Expr(
-#line  2072 "VBNET.ATG" 
+#line  2088 "VBNET.ATG" 
 out expr);
 
-#line  2072 "VBNET.ATG" 
+#line  2088 "VBNET.ATG" 
 				if (expr != null) { if(name == "") positional.Add(expr);
 				else { named.Add(new NamedArgumentExpression(name, expr)); name = ""; }
 				}
@@ -4784,10 +4796,10 @@ out expr);
 	}
 
 	void FormalParameter(
-#line  2141 "VBNET.ATG" 
+#line  2157 "VBNET.ATG" 
 out ParameterDeclarationExpression p) {
 
-#line  2143 "VBNET.ATG" 
+#line  2159 "VBNET.ATG" 
 		TypeReference type = null;
 		ParamModifierList mod = new ParamModifierList(this);
 		Expression expr = null;
@@ -4795,28 +4807,28 @@ out ParameterDeclarationExpression p) {
 		
 		while (StartOf(33)) {
 			ParameterModifier(
-#line  2148 "VBNET.ATG" 
+#line  2164 "VBNET.ATG" 
 mod);
 		}
 		Identifier();
 
-#line  2149 "VBNET.ATG" 
+#line  2165 "VBNET.ATG" 
 		string parameterName = t.val; 
 		if (
-#line  2150 "VBNET.ATG" 
+#line  2166 "VBNET.ATG" 
 IsDims()) {
 			ArrayTypeModifiers(
-#line  2150 "VBNET.ATG" 
+#line  2166 "VBNET.ATG" 
 out arrayModifiers);
 		}
 		if (la.kind == 48) {
 			lexer.NextToken();
 			TypeName(
-#line  2151 "VBNET.ATG" 
+#line  2167 "VBNET.ATG" 
 out type);
 		}
 
-#line  2153 "VBNET.ATG" 
+#line  2169 "VBNET.ATG" 
 		if(type != null) {
 		if (arrayModifiers != null) {
 			if (type.RankSpecifier != null) {
@@ -4832,45 +4844,45 @@ out type);
 		if (la.kind == 11) {
 			lexer.NextToken();
 			Expr(
-#line  2165 "VBNET.ATG" 
+#line  2181 "VBNET.ATG" 
 out expr);
 		}
 
-#line  2167 "VBNET.ATG" 
+#line  2183 "VBNET.ATG" 
 		mod.Check();
 		p = new ParameterDeclarationExpression(type, parameterName, mod.Modifier, expr);
 		
 	}
 
 	void ParameterModifier(
-#line  2802 "VBNET.ATG" 
+#line  2818 "VBNET.ATG" 
 ParamModifierList m) {
 		if (la.kind == 55) {
 			lexer.NextToken();
 
-#line  2803 "VBNET.ATG" 
+#line  2819 "VBNET.ATG" 
 			m.Add(ParameterModifiers.In); 
 		} else if (la.kind == 53) {
 			lexer.NextToken();
 
-#line  2804 "VBNET.ATG" 
+#line  2820 "VBNET.ATG" 
 			m.Add(ParameterModifiers.Ref); 
 		} else if (la.kind == 137) {
 			lexer.NextToken();
 
-#line  2805 "VBNET.ATG" 
+#line  2821 "VBNET.ATG" 
 			m.Add(ParameterModifiers.Optional); 
 		} else if (la.kind == 143) {
 			lexer.NextToken();
 
-#line  2806 "VBNET.ATG" 
+#line  2822 "VBNET.ATG" 
 			m.Add(ParameterModifiers.Params); 
 		} else SynErr(252);
 	}
 
 	void Statement() {
 
-#line  2194 "VBNET.ATG" 
+#line  2210 "VBNET.ATG" 
 		Statement stmt = null;
 		Location startPos = la.Location;
 		string label = String.Empty;
@@ -4878,34 +4890,34 @@ ParamModifierList m) {
 		
 		if (la.kind == 1 || la.kind == 13) {
 		} else if (
-#line  2200 "VBNET.ATG" 
+#line  2216 "VBNET.ATG" 
 IsLabel()) {
 			LabelName(
-#line  2200 "VBNET.ATG" 
+#line  2216 "VBNET.ATG" 
 out label);
 
-#line  2202 "VBNET.ATG" 
+#line  2218 "VBNET.ATG" 
 			compilationUnit.AddChild(new LabelStatement(t.val));
 			
 			Expect(13);
 			Statement();
 		} else if (StartOf(34)) {
 			EmbeddedStatement(
-#line  2205 "VBNET.ATG" 
+#line  2221 "VBNET.ATG" 
 out stmt);
 
-#line  2205 "VBNET.ATG" 
+#line  2221 "VBNET.ATG" 
 			compilationUnit.AddChild(stmt); 
 		} else if (StartOf(35)) {
 			LocalDeclarationStatement(
-#line  2206 "VBNET.ATG" 
+#line  2222 "VBNET.ATG" 
 out stmt);
 
-#line  2206 "VBNET.ATG" 
+#line  2222 "VBNET.ATG" 
 			compilationUnit.AddChild(stmt); 
 		} else SynErr(253);
 
-#line  2209 "VBNET.ATG" 
+#line  2225 "VBNET.ATG" 
 		if (stmt != null) {
 		stmt.StartLocation = startPos;
 		stmt.EndLocation = t.Location;
@@ -4914,30 +4926,30 @@ out stmt);
 	}
 
 	void LabelName(
-#line  2585 "VBNET.ATG" 
+#line  2601 "VBNET.ATG" 
 out string name) {
 
-#line  2587 "VBNET.ATG" 
+#line  2603 "VBNET.ATG" 
 		name = String.Empty;
 		
 		if (StartOf(13)) {
 			Identifier();
 
-#line  2589 "VBNET.ATG" 
+#line  2605 "VBNET.ATG" 
 			name = t.val; 
 		} else if (la.kind == 5) {
 			lexer.NextToken();
 
-#line  2590 "VBNET.ATG" 
+#line  2606 "VBNET.ATG" 
 			name = t.val; 
 		} else SynErr(254);
 	}
 
 	void EmbeddedStatement(
-#line  2248 "VBNET.ATG" 
+#line  2264 "VBNET.ATG" 
 out Statement statement) {
 
-#line  2250 "VBNET.ATG" 
+#line  2266 "VBNET.ATG" 
 		Statement embeddedStatement = null;
 		statement = null;
 		Expression expr = null;
@@ -4948,103 +4960,103 @@ out Statement statement) {
 		case 94: {
 			lexer.NextToken();
 
-#line  2256 "VBNET.ATG" 
+#line  2272 "VBNET.ATG" 
 			ExitType exitType = ExitType.None; 
 			switch (la.kind) {
 			case 167: {
 				lexer.NextToken();
 
-#line  2258 "VBNET.ATG" 
+#line  2274 "VBNET.ATG" 
 				exitType = ExitType.Sub; 
 				break;
 			}
 			case 100: {
 				lexer.NextToken();
 
-#line  2260 "VBNET.ATG" 
+#line  2276 "VBNET.ATG" 
 				exitType = ExitType.Function; 
 				break;
 			}
 			case 146: {
 				lexer.NextToken();
 
-#line  2262 "VBNET.ATG" 
+#line  2278 "VBNET.ATG" 
 				exitType = ExitType.Property; 
 				break;
 			}
 			case 83: {
 				lexer.NextToken();
 
-#line  2264 "VBNET.ATG" 
+#line  2280 "VBNET.ATG" 
 				exitType = ExitType.Do; 
 				break;
 			}
 			case 98: {
 				lexer.NextToken();
 
-#line  2266 "VBNET.ATG" 
+#line  2282 "VBNET.ATG" 
 				exitType = ExitType.For; 
 				break;
 			}
 			case 174: {
 				lexer.NextToken();
 
-#line  2268 "VBNET.ATG" 
+#line  2284 "VBNET.ATG" 
 				exitType = ExitType.Try; 
 				break;
 			}
 			case 181: {
 				lexer.NextToken();
 
-#line  2270 "VBNET.ATG" 
+#line  2286 "VBNET.ATG" 
 				exitType = ExitType.While; 
 				break;
 			}
 			case 155: {
 				lexer.NextToken();
 
-#line  2272 "VBNET.ATG" 
+#line  2288 "VBNET.ATG" 
 				exitType = ExitType.Select; 
 				break;
 			}
 			default: SynErr(255); break;
 			}
 
-#line  2274 "VBNET.ATG" 
+#line  2290 "VBNET.ATG" 
 			statement = new ExitStatement(exitType); 
 			break;
 		}
 		case 174: {
 			TryStatement(
-#line  2275 "VBNET.ATG" 
+#line  2291 "VBNET.ATG" 
 out statement);
 			break;
 		}
 		case 186: {
 			lexer.NextToken();
 
-#line  2276 "VBNET.ATG" 
+#line  2292 "VBNET.ATG" 
 			ContinueType continueType = ContinueType.None; 
 			if (la.kind == 83 || la.kind == 98 || la.kind == 181) {
 				if (la.kind == 83) {
 					lexer.NextToken();
 
-#line  2276 "VBNET.ATG" 
+#line  2292 "VBNET.ATG" 
 					continueType = ContinueType.Do; 
 				} else if (la.kind == 98) {
 					lexer.NextToken();
 
-#line  2276 "VBNET.ATG" 
+#line  2292 "VBNET.ATG" 
 					continueType = ContinueType.For; 
 				} else {
 					lexer.NextToken();
 
-#line  2276 "VBNET.ATG" 
+#line  2292 "VBNET.ATG" 
 					continueType = ContinueType.While; 
 				}
 			}
 
-#line  2276 "VBNET.ATG" 
+#line  2292 "VBNET.ATG" 
 			statement = new ContinueStatement(continueType); 
 			break;
 		}
@@ -5052,11 +5064,11 @@ out statement);
 			lexer.NextToken();
 			if (StartOf(27)) {
 				Expr(
-#line  2278 "VBNET.ATG" 
+#line  2294 "VBNET.ATG" 
 out expr);
 			}
 
-#line  2278 "VBNET.ATG" 
+#line  2294 "VBNET.ATG" 
 			statement = new ThrowStatement(expr); 
 			break;
 		}
@@ -5064,27 +5076,27 @@ out expr);
 			lexer.NextToken();
 			if (StartOf(27)) {
 				Expr(
-#line  2280 "VBNET.ATG" 
+#line  2296 "VBNET.ATG" 
 out expr);
 			}
 
-#line  2280 "VBNET.ATG" 
+#line  2296 "VBNET.ATG" 
 			statement = new ReturnStatement(expr); 
 			break;
 		}
 		case 168: {
 			lexer.NextToken();
 			Expr(
-#line  2282 "VBNET.ATG" 
+#line  2298 "VBNET.ATG" 
 out expr);
 			EndOfStmt();
 			Block(
-#line  2282 "VBNET.ATG" 
+#line  2298 "VBNET.ATG" 
 out embeddedStatement);
 			Expect(88);
 			Expect(168);
 
-#line  2283 "VBNET.ATG" 
+#line  2299 "VBNET.ATG" 
 			statement = new LockStatement(expr, embeddedStatement); 
 			break;
 		}
@@ -5092,42 +5104,42 @@ out embeddedStatement);
 			lexer.NextToken();
 			Identifier();
 
-#line  2285 "VBNET.ATG" 
+#line  2301 "VBNET.ATG" 
 			name = t.val; 
 			if (la.kind == 24) {
 				lexer.NextToken();
 				if (StartOf(30)) {
 					ArgumentList(
-#line  2286 "VBNET.ATG" 
+#line  2302 "VBNET.ATG" 
 out p);
 				}
 				Expect(25);
 			}
 
-#line  2287 "VBNET.ATG" 
+#line  2303 "VBNET.ATG" 
 			statement = new RaiseEventStatement(name, p); 
 			break;
 		}
 		case 182: {
 			WithStatement(
-#line  2289 "VBNET.ATG" 
+#line  2305 "VBNET.ATG" 
 out statement);
 			break;
 		}
 		case 42: {
 			lexer.NextToken();
 
-#line  2291 "VBNET.ATG" 
+#line  2307 "VBNET.ATG" 
 			Expression handlerExpr = null; 
 			Expr(
-#line  2292 "VBNET.ATG" 
+#line  2308 "VBNET.ATG" 
 out expr);
 			Expect(12);
 			Expr(
-#line  2292 "VBNET.ATG" 
+#line  2308 "VBNET.ATG" 
 out handlerExpr);
 
-#line  2294 "VBNET.ATG" 
+#line  2310 "VBNET.ATG" 
 			statement = new AddHandlerStatement(expr, handlerExpr);
 			
 			break;
@@ -5135,17 +5147,17 @@ out handlerExpr);
 		case 152: {
 			lexer.NextToken();
 
-#line  2297 "VBNET.ATG" 
+#line  2313 "VBNET.ATG" 
 			Expression handlerExpr = null; 
 			Expr(
-#line  2298 "VBNET.ATG" 
+#line  2314 "VBNET.ATG" 
 out expr);
 			Expect(12);
 			Expr(
-#line  2298 "VBNET.ATG" 
+#line  2314 "VBNET.ATG" 
 out handlerExpr);
 
-#line  2300 "VBNET.ATG" 
+#line  2316 "VBNET.ATG" 
 			statement = new RemoveHandlerStatement(expr, handlerExpr);
 			
 			break;
@@ -5153,16 +5165,16 @@ out handlerExpr);
 		case 181: {
 			lexer.NextToken();
 			Expr(
-#line  2303 "VBNET.ATG" 
+#line  2319 "VBNET.ATG" 
 out expr);
 			EndOfStmt();
 			Block(
-#line  2304 "VBNET.ATG" 
+#line  2320 "VBNET.ATG" 
 out embeddedStatement);
 			Expect(88);
 			Expect(181);
 
-#line  2306 "VBNET.ATG" 
+#line  2322 "VBNET.ATG" 
 			statement = new DoLoopStatement(expr, embeddedStatement, ConditionType.While, ConditionPosition.Start);
 			
 			break;
@@ -5170,23 +5182,23 @@ out embeddedStatement);
 		case 83: {
 			lexer.NextToken();
 
-#line  2311 "VBNET.ATG" 
+#line  2327 "VBNET.ATG" 
 			ConditionType conditionType = ConditionType.None;
 			
 			if (la.kind == 177 || la.kind == 181) {
 				WhileOrUntil(
-#line  2314 "VBNET.ATG" 
+#line  2330 "VBNET.ATG" 
 out conditionType);
 				Expr(
-#line  2314 "VBNET.ATG" 
+#line  2330 "VBNET.ATG" 
 out expr);
 				EndOfStmt();
 				Block(
-#line  2315 "VBNET.ATG" 
+#line  2331 "VBNET.ATG" 
 out embeddedStatement);
 				Expect(118);
 
-#line  2318 "VBNET.ATG" 
+#line  2334 "VBNET.ATG" 
 				statement = new DoLoopStatement(expr, 
 				                               embeddedStatement, 
 				                               conditionType == ConditionType.While ? ConditionType.DoWhile : conditionType, 
@@ -5195,19 +5207,19 @@ out embeddedStatement);
 			} else if (la.kind == 1 || la.kind == 13) {
 				EndOfStmt();
 				Block(
-#line  2325 "VBNET.ATG" 
+#line  2341 "VBNET.ATG" 
 out embeddedStatement);
 				Expect(118);
 				if (la.kind == 177 || la.kind == 181) {
 					WhileOrUntil(
-#line  2326 "VBNET.ATG" 
+#line  2342 "VBNET.ATG" 
 out conditionType);
 					Expr(
-#line  2326 "VBNET.ATG" 
+#line  2342 "VBNET.ATG" 
 out expr);
 				}
 
-#line  2328 "VBNET.ATG" 
+#line  2344 "VBNET.ATG" 
 				statement = new DoLoopStatement(expr, embeddedStatement, conditionType, ConditionPosition.End);
 				
 			} else SynErr(256);
@@ -5216,7 +5228,7 @@ out expr);
 		case 98: {
 			lexer.NextToken();
 
-#line  2333 "VBNET.ATG" 
+#line  2349 "VBNET.ATG" 
 			Expression group = null;
 			TypeReference typeReference;
 			string        typeName;
@@ -5225,24 +5237,24 @@ out expr);
 			if (la.kind == 85) {
 				lexer.NextToken();
 				LoopControlVariable(
-#line  2340 "VBNET.ATG" 
+#line  2356 "VBNET.ATG" 
 out typeReference, out typeName);
 				Expect(109);
 				Expr(
-#line  2341 "VBNET.ATG" 
+#line  2357 "VBNET.ATG" 
 out group);
 				EndOfStmt();
 				Block(
-#line  2342 "VBNET.ATG" 
+#line  2358 "VBNET.ATG" 
 out embeddedStatement);
 				Expect(128);
 				if (StartOf(27)) {
 					Expr(
-#line  2343 "VBNET.ATG" 
+#line  2359 "VBNET.ATG" 
 out expr);
 				}
 
-#line  2345 "VBNET.ATG" 
+#line  2361 "VBNET.ATG" 
 				statement = new ForeachStatement(typeReference, 
 				                                typeName,
 				                                group, 
@@ -5254,53 +5266,53 @@ out expr);
 				
 			} else if (StartOf(13)) {
 
-#line  2356 "VBNET.ATG" 
+#line  2372 "VBNET.ATG" 
 				Expression start = null;
 				Expression end = null;
 				Expression step = null;
 				Expression nextExpr = null;List<Expression> nextExpressions = null;
 				
 				LoopControlVariable(
-#line  2361 "VBNET.ATG" 
+#line  2377 "VBNET.ATG" 
 out typeReference, out typeName);
 				Expect(11);
 				Expr(
-#line  2362 "VBNET.ATG" 
+#line  2378 "VBNET.ATG" 
 out start);
 				Expect(172);
 				Expr(
-#line  2362 "VBNET.ATG" 
+#line  2378 "VBNET.ATG" 
 out end);
 				if (la.kind == 162) {
 					lexer.NextToken();
 					Expr(
-#line  2362 "VBNET.ATG" 
+#line  2378 "VBNET.ATG" 
 out step);
 				}
 				EndOfStmt();
 				Block(
-#line  2363 "VBNET.ATG" 
+#line  2379 "VBNET.ATG" 
 out embeddedStatement);
 				Expect(128);
 				if (StartOf(27)) {
 					Expr(
-#line  2366 "VBNET.ATG" 
+#line  2382 "VBNET.ATG" 
 out nextExpr);
 
-#line  2366 "VBNET.ATG" 
+#line  2382 "VBNET.ATG" 
 					nextExpressions = new List<Expression>(); nextExpressions.Add(nextExpr); 
 					while (la.kind == 12) {
 						lexer.NextToken();
 						Expr(
-#line  2367 "VBNET.ATG" 
+#line  2383 "VBNET.ATG" 
 out nextExpr);
 
-#line  2367 "VBNET.ATG" 
+#line  2383 "VBNET.ATG" 
 						nextExpressions.Add(nextExpr); 
 					}
 				}
 
-#line  2370 "VBNET.ATG" 
+#line  2386 "VBNET.ATG" 
 				statement = new ForNextStatement(typeReference, typeName, start, end, step, embeddedStatement, nextExpressions);
 				
 			} else SynErr(257);
@@ -5309,29 +5321,29 @@ out nextExpr);
 		case 92: {
 			lexer.NextToken();
 			Expr(
-#line  2374 "VBNET.ATG" 
+#line  2390 "VBNET.ATG" 
 out expr);
 
-#line  2374 "VBNET.ATG" 
+#line  2390 "VBNET.ATG" 
 			statement = new ErrorStatement(expr); 
 			break;
 		}
 		case 151: {
 			lexer.NextToken();
 
-#line  2376 "VBNET.ATG" 
+#line  2392 "VBNET.ATG" 
 			bool isPreserve = false; 
 			if (la.kind == 144) {
 				lexer.NextToken();
 
-#line  2376 "VBNET.ATG" 
+#line  2392 "VBNET.ATG" 
 				isPreserve = true; 
 			}
 			ReDimClause(
-#line  2377 "VBNET.ATG" 
+#line  2393 "VBNET.ATG" 
 out expr);
 
-#line  2379 "VBNET.ATG" 
+#line  2395 "VBNET.ATG" 
 			ReDimStatement reDimStatement = new ReDimStatement(isPreserve);
 			statement = reDimStatement;
 			InvocationExpression redimClause = expr as InvocationExpression;
@@ -5340,13 +5352,13 @@ out expr);
 			while (la.kind == 12) {
 				lexer.NextToken();
 				ReDimClause(
-#line  2384 "VBNET.ATG" 
+#line  2400 "VBNET.ATG" 
 out expr);
 
-#line  2385 "VBNET.ATG" 
+#line  2401 "VBNET.ATG" 
 				redimClause = expr as InvocationExpression; 
 
-#line  2386 "VBNET.ATG" 
+#line  2402 "VBNET.ATG" 
 				if (redimClause != null) { reDimStatement.ReDimClauses.Add(redimClause); } 
 			}
 			break;
@@ -5354,10 +5366,10 @@ out expr);
 		case 91: {
 			lexer.NextToken();
 			Expr(
-#line  2390 "VBNET.ATG" 
+#line  2406 "VBNET.ATG" 
 out expr);
 
-#line  2391 "VBNET.ATG" 
+#line  2407 "VBNET.ATG" 
 			List<Expression> arrays = new List<Expression>();
 			if (expr != null) { arrays.Add(expr);}
 			EraseStatement eraseStatement = new EraseStatement(arrays);
@@ -5366,53 +5378,53 @@ out expr);
 			while (la.kind == 12) {
 				lexer.NextToken();
 				Expr(
-#line  2396 "VBNET.ATG" 
+#line  2412 "VBNET.ATG" 
 out expr);
 
-#line  2396 "VBNET.ATG" 
+#line  2412 "VBNET.ATG" 
 				if (expr != null) { arrays.Add(expr); }
 			}
 
-#line  2397 "VBNET.ATG" 
+#line  2413 "VBNET.ATG" 
 			statement = eraseStatement; 
 			break;
 		}
 		case 163: {
 			lexer.NextToken();
 
-#line  2399 "VBNET.ATG" 
+#line  2415 "VBNET.ATG" 
 			statement = new StopStatement(); 
 			break;
 		}
 		case 106: {
 			lexer.NextToken();
 			Expr(
-#line  2401 "VBNET.ATG" 
+#line  2417 "VBNET.ATG" 
 out expr);
 			if (la.kind == 170) {
 				lexer.NextToken();
 			}
 			if (
-#line  2403 "VBNET.ATG" 
+#line  2419 "VBNET.ATG" 
 IsEndStmtAhead()) {
 				Expect(88);
 
-#line  2403 "VBNET.ATG" 
+#line  2419 "VBNET.ATG" 
 				statement = new IfElseStatement(expr, new EndStatement()); 
 			} else if (la.kind == 1 || la.kind == 13) {
 				EndOfStmt();
 				Block(
-#line  2406 "VBNET.ATG" 
+#line  2422 "VBNET.ATG" 
 out embeddedStatement);
 
-#line  2408 "VBNET.ATG" 
+#line  2424 "VBNET.ATG" 
 				IfElseStatement ifStatement = new IfElseStatement(expr, embeddedStatement);
 				
 				while (la.kind == 87 || 
-#line  2412 "VBNET.ATG" 
+#line  2428 "VBNET.ATG" 
 IsElseIf()) {
 					if (
-#line  2412 "VBNET.ATG" 
+#line  2428 "VBNET.ATG" 
 IsElseIf()) {
 						Expect(86);
 						Expect(106);
@@ -5420,20 +5432,20 @@ IsElseIf()) {
 						lexer.NextToken();
 					}
 
-#line  2415 "VBNET.ATG" 
+#line  2431 "VBNET.ATG" 
 					Expression condition = null; Statement block = null; 
 					Expr(
-#line  2416 "VBNET.ATG" 
+#line  2432 "VBNET.ATG" 
 out condition);
 					if (la.kind == 170) {
 						lexer.NextToken();
 					}
 					EndOfStmt();
 					Block(
-#line  2417 "VBNET.ATG" 
+#line  2433 "VBNET.ATG" 
 out block);
 
-#line  2419 "VBNET.ATG" 
+#line  2435 "VBNET.ATG" 
 					ifStatement.ElseIfSections.Add(new ElseIfSection(condition, block));
 					
 				}
@@ -5441,59 +5453,59 @@ out block);
 					lexer.NextToken();
 					EndOfStmt();
 					Block(
-#line  2424 "VBNET.ATG" 
+#line  2440 "VBNET.ATG" 
 out embeddedStatement);
 
-#line  2426 "VBNET.ATG" 
+#line  2442 "VBNET.ATG" 
 					ifStatement.FalseStatement.Add(embeddedStatement);
 					
 				}
 				Expect(88);
 				Expect(106);
 
-#line  2430 "VBNET.ATG" 
+#line  2446 "VBNET.ATG" 
 				statement = ifStatement;
 				
 			} else if (StartOf(34)) {
 				EmbeddedStatement(
-#line  2433 "VBNET.ATG" 
+#line  2449 "VBNET.ATG" 
 out embeddedStatement);
 
-#line  2435 "VBNET.ATG" 
+#line  2451 "VBNET.ATG" 
 				IfElseStatement ifStatement = new IfElseStatement(expr, embeddedStatement);
 				
 				while (la.kind == 13) {
 					lexer.NextToken();
 					EmbeddedStatement(
-#line  2437 "VBNET.ATG" 
+#line  2453 "VBNET.ATG" 
 out embeddedStatement);
 
-#line  2437 "VBNET.ATG" 
+#line  2453 "VBNET.ATG" 
 					ifStatement.TrueStatement.Add(embeddedStatement); 
 				}
 				if (la.kind == 86) {
 					lexer.NextToken();
 					if (StartOf(34)) {
 						EmbeddedStatement(
-#line  2439 "VBNET.ATG" 
+#line  2455 "VBNET.ATG" 
 out embeddedStatement);
 					}
 
-#line  2441 "VBNET.ATG" 
+#line  2457 "VBNET.ATG" 
 					ifStatement.FalseStatement.Add(embeddedStatement);
 					
 					while (la.kind == 13) {
 						lexer.NextToken();
 						EmbeddedStatement(
-#line  2444 "VBNET.ATG" 
+#line  2460 "VBNET.ATG" 
 out embeddedStatement);
 
-#line  2445 "VBNET.ATG" 
+#line  2461 "VBNET.ATG" 
 						ifStatement.FalseStatement.Add(embeddedStatement); 
 					}
 				}
 
-#line  2448 "VBNET.ATG" 
+#line  2464 "VBNET.ATG" 
 				statement = ifStatement; 
 			} else SynErr(258);
 			break;
@@ -5504,43 +5516,43 @@ out embeddedStatement);
 				lexer.NextToken();
 			}
 			Expr(
-#line  2451 "VBNET.ATG" 
+#line  2467 "VBNET.ATG" 
 out expr);
 			EndOfStmt();
 
-#line  2452 "VBNET.ATG" 
+#line  2468 "VBNET.ATG" 
 			List<SwitchSection> selectSections = new List<SwitchSection>();
 			Statement block = null;
 			
 			while (la.kind == 57) {
 
-#line  2456 "VBNET.ATG" 
+#line  2472 "VBNET.ATG" 
 				List<CaseLabel> caseClauses = null; 
 				lexer.NextToken();
 				CaseClauses(
-#line  2457 "VBNET.ATG" 
+#line  2473 "VBNET.ATG" 
 out caseClauses);
 				if (
-#line  2457 "VBNET.ATG" 
+#line  2473 "VBNET.ATG" 
 IsNotStatementSeparator()) {
 					lexer.NextToken();
 				}
 				EndOfStmt();
 
-#line  2459 "VBNET.ATG" 
+#line  2475 "VBNET.ATG" 
 				SwitchSection selectSection = new SwitchSection(caseClauses);
 				
 				Block(
-#line  2461 "VBNET.ATG" 
+#line  2477 "VBNET.ATG" 
 out block);
 
-#line  2463 "VBNET.ATG" 
+#line  2479 "VBNET.ATG" 
 				selectSection.Children = block.Children;
 				selectSections.Add(selectSection);
 				
 			}
 
-#line  2467 "VBNET.ATG" 
+#line  2483 "VBNET.ATG" 
 			statement = new SwitchStatement(expr, selectSections); 
 			Expect(88);
 			Expect(155);
@@ -5548,43 +5560,43 @@ out block);
 		}
 		case 135: {
 
-#line  2469 "VBNET.ATG" 
+#line  2485 "VBNET.ATG" 
 			OnErrorStatement onErrorStatement = null; 
 			OnErrorStatement(
-#line  2470 "VBNET.ATG" 
+#line  2486 "VBNET.ATG" 
 out onErrorStatement);
 
-#line  2470 "VBNET.ATG" 
+#line  2486 "VBNET.ATG" 
 			statement = onErrorStatement; 
 			break;
 		}
 		case 104: {
 
-#line  2471 "VBNET.ATG" 
+#line  2487 "VBNET.ATG" 
 			GotoStatement goToStatement = null; 
 			GotoStatement(
-#line  2472 "VBNET.ATG" 
+#line  2488 "VBNET.ATG" 
 out goToStatement);
 
-#line  2472 "VBNET.ATG" 
+#line  2488 "VBNET.ATG" 
 			statement = goToStatement; 
 			break;
 		}
 		case 153: {
 
-#line  2473 "VBNET.ATG" 
+#line  2489 "VBNET.ATG" 
 			ResumeStatement resumeStatement = null; 
 			ResumeStatement(
-#line  2474 "VBNET.ATG" 
+#line  2490 "VBNET.ATG" 
 out resumeStatement);
 
-#line  2474 "VBNET.ATG" 
+#line  2490 "VBNET.ATG" 
 			statement = resumeStatement; 
 			break;
 		}
 		case 2: case 3: case 4: case 5: case 6: case 7: case 8: case 9: case 10: case 24: case 43: case 47: case 49: case 50: case 51: case 52: case 54: case 59: case 60: case 61: case 62: case 63: case 64: case 65: case 66: case 68: case 69: case 70: case 72: case 73: case 74: case 75: case 76: case 77: case 82: case 84: case 96: case 102: case 111: case 117: case 119: case 124: case 125: case 127: case 130: case 133: case 144: case 159: case 160: case 165: case 169: case 173: case 175: case 176: case 177: case 190: case 191: case 192: case 193: case 194: case 195: case 196: case 197: case 198: case 199: case 204: {
 
-#line  2477 "VBNET.ATG" 
+#line  2493 "VBNET.ATG" 
 			Expression val = null;
 			AssignmentOperatorType op;
 			
@@ -5592,25 +5604,25 @@ out resumeStatement);
 			                        la.kind == Tokens.Not   || la.kind == Tokens.Times;
 			
 			SimpleExpr(
-#line  2483 "VBNET.ATG" 
+#line  2499 "VBNET.ATG" 
 out expr);
 			if (StartOf(36)) {
 				AssignmentOperator(
-#line  2485 "VBNET.ATG" 
+#line  2501 "VBNET.ATG" 
 out op);
 				Expr(
-#line  2485 "VBNET.ATG" 
+#line  2501 "VBNET.ATG" 
 out val);
 
-#line  2485 "VBNET.ATG" 
+#line  2501 "VBNET.ATG" 
 				expr = new AssignmentExpression(expr, op, val); 
 			} else if (la.kind == 1 || la.kind == 13 || la.kind == 86) {
 
-#line  2486 "VBNET.ATG" 
+#line  2502 "VBNET.ATG" 
 				if (mustBeAssignment) Error("error in assignment."); 
 			} else SynErr(259);
 
-#line  2489 "VBNET.ATG" 
+#line  2505 "VBNET.ATG" 
 			// a field reference expression that stands alone is a
 			// invocation expression without parantheses and arguments
 			if(expr is FieldReferenceExpression || expr is IdentifierExpression) {
@@ -5623,48 +5635,48 @@ out val);
 		case 56: {
 			lexer.NextToken();
 			SimpleExpr(
-#line  2496 "VBNET.ATG" 
+#line  2512 "VBNET.ATG" 
 out expr);
 
-#line  2496 "VBNET.ATG" 
+#line  2512 "VBNET.ATG" 
 			statement = new ExpressionStatement(expr); 
 			break;
 		}
 		case 188: {
 			lexer.NextToken();
 
-#line  2498 "VBNET.ATG" 
+#line  2514 "VBNET.ATG" 
 			Statement block;  
 			if (
-#line  2499 "VBNET.ATG" 
+#line  2515 "VBNET.ATG" 
 Peek(1).kind == Tokens.As) {
 
-#line  2500 "VBNET.ATG" 
+#line  2516 "VBNET.ATG" 
 				LocalVariableDeclaration resourceAquisition = new LocalVariableDeclaration(Modifiers.None); 
 				VariableDeclarator(
-#line  2501 "VBNET.ATG" 
+#line  2517 "VBNET.ATG" 
 resourceAquisition.Variables);
 				while (la.kind == 12) {
 					lexer.NextToken();
 					VariableDeclarator(
-#line  2503 "VBNET.ATG" 
+#line  2519 "VBNET.ATG" 
 resourceAquisition.Variables);
 				}
 				Block(
-#line  2505 "VBNET.ATG" 
+#line  2521 "VBNET.ATG" 
 out block);
 
-#line  2506 "VBNET.ATG" 
+#line  2522 "VBNET.ATG" 
 				statement = new UsingStatement(resourceAquisition, block); 
 			} else if (StartOf(27)) {
 				Expr(
-#line  2507 "VBNET.ATG" 
+#line  2523 "VBNET.ATG" 
 out expr);
 				Block(
-#line  2508 "VBNET.ATG" 
+#line  2524 "VBNET.ATG" 
 out block);
 
-#line  2509 "VBNET.ATG" 
+#line  2525 "VBNET.ATG" 
 				statement = new UsingStatement(new ExpressionStatement(expr), block); 
 			} else SynErr(260);
 			Expect(88);
@@ -5676,10 +5688,10 @@ out block);
 	}
 
 	void LocalDeclarationStatement(
-#line  2217 "VBNET.ATG" 
+#line  2233 "VBNET.ATG" 
 out Statement statement) {
 
-#line  2219 "VBNET.ATG" 
+#line  2235 "VBNET.ATG" 
 		ModifierList m = new ModifierList();
 		LocalVariableDeclaration localVariableDeclaration;
 		bool dimfound = false;
@@ -5688,22 +5700,22 @@ out Statement statement) {
 			if (la.kind == 71) {
 				lexer.NextToken();
 
-#line  2225 "VBNET.ATG" 
+#line  2241 "VBNET.ATG" 
 				m.Add(Modifiers.Const, t.Location); 
 			} else if (la.kind == 161) {
 				lexer.NextToken();
 
-#line  2226 "VBNET.ATG" 
+#line  2242 "VBNET.ATG" 
 				m.Add(Modifiers.Static, t.Location); 
 			} else {
 				lexer.NextToken();
 
-#line  2227 "VBNET.ATG" 
+#line  2243 "VBNET.ATG" 
 				dimfound = true; 
 			}
 		}
 
-#line  2230 "VBNET.ATG" 
+#line  2246 "VBNET.ATG" 
 		if(dimfound && (m.Modifier & Modifiers.Const) != 0) {
 		Error("Dim is not allowed on constants.");
 		}
@@ -5716,135 +5728,135 @@ out Statement statement) {
 		localVariableDeclaration.StartLocation = t.Location;
 		
 		VariableDeclarator(
-#line  2241 "VBNET.ATG" 
+#line  2257 "VBNET.ATG" 
 localVariableDeclaration.Variables);
 		while (la.kind == 12) {
 			lexer.NextToken();
 			VariableDeclarator(
-#line  2242 "VBNET.ATG" 
+#line  2258 "VBNET.ATG" 
 localVariableDeclaration.Variables);
 		}
 
-#line  2244 "VBNET.ATG" 
+#line  2260 "VBNET.ATG" 
 		statement = localVariableDeclaration;
 		
 	}
 
 	void TryStatement(
-#line  2699 "VBNET.ATG" 
+#line  2715 "VBNET.ATG" 
 out Statement tryStatement) {
 
-#line  2701 "VBNET.ATG" 
+#line  2717 "VBNET.ATG" 
 		Statement blockStmt = null, finallyStmt = null;List<CatchClause> catchClauses = null;
 		
 		Expect(174);
 		EndOfStmt();
 		Block(
-#line  2704 "VBNET.ATG" 
+#line  2720 "VBNET.ATG" 
 out blockStmt);
 		if (la.kind == 58 || la.kind == 88 || la.kind == 97) {
 			CatchClauses(
-#line  2705 "VBNET.ATG" 
+#line  2721 "VBNET.ATG" 
 out catchClauses);
 		}
 		if (la.kind == 97) {
 			lexer.NextToken();
 			EndOfStmt();
 			Block(
-#line  2706 "VBNET.ATG" 
+#line  2722 "VBNET.ATG" 
 out finallyStmt);
 		}
 		Expect(88);
 		Expect(174);
 
-#line  2709 "VBNET.ATG" 
+#line  2725 "VBNET.ATG" 
 		tryStatement = new TryCatchStatement(blockStmt, catchClauses, finallyStmt);
 		
 	}
 
 	void WithStatement(
-#line  2679 "VBNET.ATG" 
+#line  2695 "VBNET.ATG" 
 out Statement withStatement) {
 
-#line  2681 "VBNET.ATG" 
+#line  2697 "VBNET.ATG" 
 		Statement blockStmt = null;
 		Expression expr = null;
 		
 		Expect(182);
 
-#line  2684 "VBNET.ATG" 
+#line  2700 "VBNET.ATG" 
 		Location start = t.Location; 
 		Expr(
-#line  2685 "VBNET.ATG" 
+#line  2701 "VBNET.ATG" 
 out expr);
 		EndOfStmt();
 
-#line  2687 "VBNET.ATG" 
+#line  2703 "VBNET.ATG" 
 		withStatement = new WithStatement(expr);
 		withStatement.StartLocation = start;
 		
 		Block(
-#line  2690 "VBNET.ATG" 
+#line  2706 "VBNET.ATG" 
 out blockStmt);
 
-#line  2692 "VBNET.ATG" 
+#line  2708 "VBNET.ATG" 
 		((WithStatement)withStatement).Body = (BlockStatement)blockStmt;
 		
 		Expect(88);
 		Expect(182);
 
-#line  2695 "VBNET.ATG" 
+#line  2711 "VBNET.ATG" 
 		withStatement.EndLocation = t.Location; 
 	}
 
 	void WhileOrUntil(
-#line  2672 "VBNET.ATG" 
+#line  2688 "VBNET.ATG" 
 out ConditionType conditionType) {
 
-#line  2673 "VBNET.ATG" 
+#line  2689 "VBNET.ATG" 
 		conditionType = ConditionType.None; 
 		if (la.kind == 181) {
 			lexer.NextToken();
 
-#line  2674 "VBNET.ATG" 
+#line  2690 "VBNET.ATG" 
 			conditionType = ConditionType.While; 
 		} else if (la.kind == 177) {
 			lexer.NextToken();
 
-#line  2675 "VBNET.ATG" 
+#line  2691 "VBNET.ATG" 
 			conditionType = ConditionType.Until; 
 		} else SynErr(262);
 	}
 
 	void LoopControlVariable(
-#line  2515 "VBNET.ATG" 
+#line  2531 "VBNET.ATG" 
 out TypeReference type, out string name) {
 
-#line  2516 "VBNET.ATG" 
+#line  2532 "VBNET.ATG" 
 		ArrayList arrayModifiers = null;
 		type = null;
 		
 		Qualident(
-#line  2520 "VBNET.ATG" 
+#line  2536 "VBNET.ATG" 
 out name);
 		if (
-#line  2521 "VBNET.ATG" 
+#line  2537 "VBNET.ATG" 
 IsDims()) {
 			ArrayTypeModifiers(
-#line  2521 "VBNET.ATG" 
+#line  2537 "VBNET.ATG" 
 out arrayModifiers);
 		}
 		if (la.kind == 48) {
 			lexer.NextToken();
 			TypeName(
-#line  2522 "VBNET.ATG" 
+#line  2538 "VBNET.ATG" 
 out type);
 
-#line  2522 "VBNET.ATG" 
+#line  2538 "VBNET.ATG" 
 			if (name.IndexOf('.') > 0) { Error("No type def for 'for each' member indexer allowed."); } 
 		}
 
-#line  2524 "VBNET.ATG" 
+#line  2540 "VBNET.ATG" 
 		if (type != null) {
 		if(type.RankSpecifier != null && arrayModifiers != null) {
 			Error("array rank only allowed one time");
@@ -5856,59 +5868,59 @@ out type);
 	}
 
 	void ReDimClause(
-#line  2594 "VBNET.ATG" 
+#line  2610 "VBNET.ATG" 
 out Expression expr) {
 		SimpleNonInvocationExpression(
-#line  2596 "VBNET.ATG" 
+#line  2612 "VBNET.ATG" 
 out expr);
 		ReDimClauseInternal(
-#line  2597 "VBNET.ATG" 
+#line  2613 "VBNET.ATG" 
 ref expr);
 	}
 
 	void CaseClauses(
-#line  2632 "VBNET.ATG" 
+#line  2648 "VBNET.ATG" 
 out List<CaseLabel> caseClauses) {
 
-#line  2634 "VBNET.ATG" 
+#line  2650 "VBNET.ATG" 
 		caseClauses = new List<CaseLabel>();
 		CaseLabel caseClause = null;
 		
 		CaseClause(
-#line  2637 "VBNET.ATG" 
+#line  2653 "VBNET.ATG" 
 out caseClause);
 
-#line  2637 "VBNET.ATG" 
+#line  2653 "VBNET.ATG" 
 		if (caseClause != null) { caseClauses.Add(caseClause); } 
 		while (la.kind == 12) {
 			lexer.NextToken();
 			CaseClause(
-#line  2638 "VBNET.ATG" 
+#line  2654 "VBNET.ATG" 
 out caseClause);
 
-#line  2638 "VBNET.ATG" 
+#line  2654 "VBNET.ATG" 
 			if (caseClause != null) { caseClauses.Add(caseClause); } 
 		}
 	}
 
 	void OnErrorStatement(
-#line  2535 "VBNET.ATG" 
+#line  2551 "VBNET.ATG" 
 out OnErrorStatement stmt) {
 
-#line  2537 "VBNET.ATG" 
+#line  2553 "VBNET.ATG" 
 		stmt = null;
 		GotoStatement goToStatement = null;
 		
 		Expect(135);
 		Expect(92);
 		if (
-#line  2543 "VBNET.ATG" 
+#line  2559 "VBNET.ATG" 
 IsNegativeLabelName()) {
 			Expect(104);
 			Expect(15);
 			Expect(5);
 
-#line  2545 "VBNET.ATG" 
+#line  2561 "VBNET.ATG" 
 			long intLabel = Int64.Parse(t.val);
 			if(intLabel != 1) {
 				Error("invalid label in on error statement.");
@@ -5917,10 +5929,10 @@ IsNegativeLabelName()) {
 			
 		} else if (la.kind == 104) {
 			GotoStatement(
-#line  2551 "VBNET.ATG" 
+#line  2567 "VBNET.ATG" 
 out goToStatement);
 
-#line  2553 "VBNET.ATG" 
+#line  2569 "VBNET.ATG" 
 			string val = goToStatement.Label;
 			
 			// if value is numeric, make sure that is 0
@@ -5937,88 +5949,88 @@ out goToStatement);
 			lexer.NextToken();
 			Expect(128);
 
-#line  2567 "VBNET.ATG" 
+#line  2583 "VBNET.ATG" 
 			stmt = new OnErrorStatement(new ResumeStatement(true));
 			
 		} else SynErr(263);
 	}
 
 	void GotoStatement(
-#line  2573 "VBNET.ATG" 
+#line  2589 "VBNET.ATG" 
 out GotoStatement goToStatement) {
 
-#line  2575 "VBNET.ATG" 
+#line  2591 "VBNET.ATG" 
 		string label = String.Empty;
 		
 		Expect(104);
 		LabelName(
-#line  2578 "VBNET.ATG" 
+#line  2594 "VBNET.ATG" 
 out label);
 
-#line  2580 "VBNET.ATG" 
+#line  2596 "VBNET.ATG" 
 		goToStatement = new GotoStatement(label);
 		
 	}
 
 	void ResumeStatement(
-#line  2621 "VBNET.ATG" 
+#line  2637 "VBNET.ATG" 
 out ResumeStatement resumeStatement) {
 
-#line  2623 "VBNET.ATG" 
+#line  2639 "VBNET.ATG" 
 		resumeStatement = null;
 		string label = String.Empty;
 		
 		if (
-#line  2626 "VBNET.ATG" 
+#line  2642 "VBNET.ATG" 
 IsResumeNext()) {
 			Expect(153);
 			Expect(128);
 
-#line  2627 "VBNET.ATG" 
+#line  2643 "VBNET.ATG" 
 			resumeStatement = new ResumeStatement(true); 
 		} else if (la.kind == 153) {
 			lexer.NextToken();
 			if (StartOf(37)) {
 				LabelName(
-#line  2628 "VBNET.ATG" 
+#line  2644 "VBNET.ATG" 
 out label);
 			}
 
-#line  2628 "VBNET.ATG" 
+#line  2644 "VBNET.ATG" 
 			resumeStatement = new ResumeStatement(label); 
 		} else SynErr(264);
 	}
 
 	void ReDimClauseInternal(
-#line  2600 "VBNET.ATG" 
+#line  2616 "VBNET.ATG" 
 ref Expression expr) {
 
-#line  2601 "VBNET.ATG" 
+#line  2617 "VBNET.ATG" 
 		List<Expression> arguments; bool canBeNormal; bool canBeRedim; string name; 
 		while (la.kind == 10 || 
-#line  2604 "VBNET.ATG" 
+#line  2620 "VBNET.ATG" 
 la.kind == Tokens.OpenParenthesis && Peek(1).kind == Tokens.Of) {
 			if (la.kind == 10) {
 				lexer.NextToken();
 				IdentifierOrKeyword(
-#line  2603 "VBNET.ATG" 
+#line  2619 "VBNET.ATG" 
 out name);
 
-#line  2603 "VBNET.ATG" 
+#line  2619 "VBNET.ATG" 
 				expr = new FieldReferenceExpression(expr, name); 
 			} else {
 				InvocationExpression(
-#line  2605 "VBNET.ATG" 
+#line  2621 "VBNET.ATG" 
 ref expr);
 			}
 		}
 		Expect(24);
 		NormalOrReDimArgumentList(
-#line  2608 "VBNET.ATG" 
+#line  2624 "VBNET.ATG" 
 out arguments, out canBeNormal, out canBeRedim);
 		Expect(25);
 
-#line  2610 "VBNET.ATG" 
+#line  2626 "VBNET.ATG" 
 		expr = new InvocationExpression(expr, arguments);
 		if (canBeRedim == false || canBeNormal && (la.kind == Tokens.Dot || la.kind == Tokens.OpenParenthesis)) {
 			if (this.Errors.Count == 0) {
@@ -6030,10 +6042,10 @@ out arguments, out canBeNormal, out canBeRedim);
 	}
 
 	void CaseClause(
-#line  2642 "VBNET.ATG" 
+#line  2658 "VBNET.ATG" 
 out CaseLabel caseClause) {
 
-#line  2644 "VBNET.ATG" 
+#line  2660 "VBNET.ATG" 
 		Expression expr = null;
 		Expression sexpr = null;
 		BinaryOperatorType op = BinaryOperatorType.None;
@@ -6042,7 +6054,7 @@ out CaseLabel caseClause) {
 		if (la.kind == 86) {
 			lexer.NextToken();
 
-#line  2650 "VBNET.ATG" 
+#line  2666 "VBNET.ATG" 
 			caseClause = new CaseLabel(); 
 		} else if (StartOf(38)) {
 			if (la.kind == 113) {
@@ -6052,76 +6064,76 @@ out CaseLabel caseClause) {
 			case 27: {
 				lexer.NextToken();
 
-#line  2654 "VBNET.ATG" 
+#line  2670 "VBNET.ATG" 
 				op = BinaryOperatorType.LessThan; 
 				break;
 			}
 			case 26: {
 				lexer.NextToken();
 
-#line  2655 "VBNET.ATG" 
+#line  2671 "VBNET.ATG" 
 				op = BinaryOperatorType.GreaterThan; 
 				break;
 			}
 			case 30: {
 				lexer.NextToken();
 
-#line  2656 "VBNET.ATG" 
+#line  2672 "VBNET.ATG" 
 				op = BinaryOperatorType.LessThanOrEqual; 
 				break;
 			}
 			case 29: {
 				lexer.NextToken();
 
-#line  2657 "VBNET.ATG" 
+#line  2673 "VBNET.ATG" 
 				op = BinaryOperatorType.GreaterThanOrEqual; 
 				break;
 			}
 			case 11: {
 				lexer.NextToken();
 
-#line  2658 "VBNET.ATG" 
+#line  2674 "VBNET.ATG" 
 				op = BinaryOperatorType.Equality; 
 				break;
 			}
 			case 28: {
 				lexer.NextToken();
 
-#line  2659 "VBNET.ATG" 
+#line  2675 "VBNET.ATG" 
 				op = BinaryOperatorType.InEquality; 
 				break;
 			}
 			default: SynErr(265); break;
 			}
 			Expr(
-#line  2661 "VBNET.ATG" 
+#line  2677 "VBNET.ATG" 
 out expr);
 
-#line  2663 "VBNET.ATG" 
+#line  2679 "VBNET.ATG" 
 			caseClause = new CaseLabel(op, expr);
 			
 		} else if (StartOf(27)) {
 			Expr(
-#line  2665 "VBNET.ATG" 
+#line  2681 "VBNET.ATG" 
 out expr);
 			if (la.kind == 172) {
 				lexer.NextToken();
 				Expr(
-#line  2665 "VBNET.ATG" 
+#line  2681 "VBNET.ATG" 
 out sexpr);
 			}
 
-#line  2667 "VBNET.ATG" 
+#line  2683 "VBNET.ATG" 
 			caseClause = new CaseLabel(expr, sexpr);
 			
 		} else SynErr(266);
 	}
 
 	void CatchClauses(
-#line  2714 "VBNET.ATG" 
+#line  2730 "VBNET.ATG" 
 out List<CatchClause> catchClauses) {
 
-#line  2716 "VBNET.ATG" 
+#line  2732 "VBNET.ATG" 
 		catchClauses = new List<CatchClause>();
 		TypeReference type = null;
 		Statement blockStmt = null;
@@ -6133,27 +6145,27 @@ out List<CatchClause> catchClauses) {
 			if (StartOf(13)) {
 				Identifier();
 
-#line  2724 "VBNET.ATG" 
+#line  2740 "VBNET.ATG" 
 				name = t.val; 
 				if (la.kind == 48) {
 					lexer.NextToken();
 					TypeName(
-#line  2724 "VBNET.ATG" 
+#line  2740 "VBNET.ATG" 
 out type);
 				}
 			}
 			if (la.kind == 180) {
 				lexer.NextToken();
 				Expr(
-#line  2725 "VBNET.ATG" 
+#line  2741 "VBNET.ATG" 
 out expr);
 			}
 			EndOfStmt();
 			Block(
-#line  2727 "VBNET.ATG" 
+#line  2743 "VBNET.ATG" 
 out blockStmt);
 
-#line  2728 "VBNET.ATG" 
+#line  2744 "VBNET.ATG" 
 			catchClauses.Add(new CatchClause(type, name, blockStmt, expr)); 
 		}
 	}
diff --git a/src/Libraries/NRefactory/Project/Src/Parser/VBNet/VBNET.ATG b/src/Libraries/NRefactory/Project/Src/Parser/VBNet/VBNET.ATG
index 67fe80d427..93ee505a24 100644
--- a/src/Libraries/NRefactory/Project/Src/Parser/VBNet/VBNET.ATG
+++ b/src/Libraries/NRefactory/Project/Src/Parser/VBNet/VBNET.ATG
@@ -606,7 +606,10 @@ InterfaceMemberDecl
 	{ MemberModifier<mod> }
 	(
 		"Event"
-		(. mod.Check(Modifiers.VBInterfaceEvents); .)
+		(.
+			mod.Check(Modifiers.VBInterfaceEvents);
+			Location startLocation = t.Location;
+		.)
 		Identifier (. name = t.val; .)
 		[ "(" [ FormalParameterList<p> ] ")" ]
 		[ "As" TypeName<out type> ]
@@ -614,11 +617,15 @@ InterfaceMemberDecl
 		(.
 			EventDeclaration ed = new EventDeclaration(type, mod.Modifier, p, attributes, name, null);
 			compilationUnit.AddChild(ed);
+			ed.StartLocation = startLocation;
 			ed.EndLocation = t.EndLocation;
 		.)
 		|
 		"Sub"
-		(. mod.Check(Modifiers.VBInterfaceMethods); .)
+		(.
+			Location startLocation =  t.Location;
+			mod.Check(Modifiers.VBInterfaceMethods);
+		.)
 		Identifier (. name = t.val; .)
 		TypeParameterList<templates>
 		[ "(" [ FormalParameterList<p> ] ")" ]
@@ -626,13 +633,17 @@ InterfaceMemberDecl
 		(.
 			MethodDeclaration md = new MethodDeclaration(name, mod.Modifier, null, p, attributes);
 			md.TypeReference = new TypeReference("", "System.Void");
+			md.StartLocation = startLocation;
 			md.EndLocation = t.EndLocation;
 			md.Templates = templates;
 			compilationUnit.AddChild(md);
 		.)
 		|
 		"Function"
-		(. mod.Check(Modifiers.VBInterfaceMethods); .)
+		(.
+			mod.Check(Modifiers.VBInterfaceMethods);
+			Location startLocation = t.Location;
+		.)
 		Identifier (. name = t.val; .)
 		TypeParameterList<templates>
 		[ "(" [ FormalParameterList<p> ] ")" ]
@@ -646,6 +657,7 @@ InterfaceMemberDecl
 				returnTypeAttributeSection.AttributeTarget = "return";
 				md.Attributes.Add(returnTypeAttributeSection);
 			}
+			md.StartLocation = startLocation;
 			md.EndLocation = t.EndLocation;
 			md.Templates = templates;
 			compilationUnit.AddChild(md);
@@ -653,7 +665,10 @@ InterfaceMemberDecl
 		EOL
 		|
 		"Property"
-		(. mod.Check(Modifiers.VBInterfaceProperties); .)
+		(.
+			Location startLocation = t.Location;
+			mod.Check(Modifiers.VBInterfaceProperties);
+		.)
 		Identifier	(. name = t.val;  .)
 		[ "(" [ FormalParameterList<p> ] ")" ]
 		[ "As" TypeName<out type> ]
@@ -667,6 +682,7 @@ InterfaceMemberDecl
 			PropertyDeclaration pd = new PropertyDeclaration(name, type, mod.Modifier, attributes);
 			pd.Parameters = p;
 			pd.EndLocation = t.EndLocation;
+			pd.StartLocation = startLocation;
 			compilationUnit.AddChild(pd);
 		.)
 	)