void FormalParameter( //#line 2948 "VBNET.ATG" out ParameterDeclarationExpression p) { //#line 2950 "VBNET.ATG" AttributeSection section; List<AttributeSection> attributes = new List<AttributeSection>(); TypeReference type = null; ParamModifierList mod = new ParamModifierList(this); Expression expr = null; p = null; ArrayList arrayModifiers = null; Location startLocation = la.Location; while (la.kind == 40) { AttributeSection( //#line 2960 "VBNET.ATG" out section); //#line 2960 "VBNET.ATG" attributes.Add(section); } while (StartOf(29)) { ParameterModifier( //#line 2961 "VBNET.ATG" mod); } Identifier(); //#line 2962 "VBNET.ATG" string parameterName = t.val; if ( //#line 2963 "VBNET.ATG" IsDims()) { ArrayTypeModifiers( //#line 2963 "VBNET.ATG" out arrayModifiers); } if (la.kind == 63) { lexer.NextToken(); TypeName( //#line 2964 "VBNET.ATG" out type); } //#line 2966 "VBNET.ATG" if(type != null) { if (arrayModifiers != null) { if (type.RankSpecifier != null) { Error("array rank only allowed one time"); } else { type.RankSpecifier = (int[])arrayModifiers.ToArray(typeof(int)); } } } if (la.kind == 20) { lexer.NextToken(); Expr( //#line 2976 "VBNET.ATG" out expr); } //#line 2978 "VBNET.ATG" mod.Check(); p = new ParameterDeclarationExpression(type, parameterName, mod.Modifier, expr); p.Attributes = attributes; p.StartLocation = startLocation; p.EndLocation = t.EndLocation; }
void ParameterModifier( //#line 3701 "VBNET.ATG" ParamModifierList m) { if (la.kind == 72) { lexer.NextToken(); //#line 3702 "VBNET.ATG" m.Add(ParameterModifiers.In); } else if (la.kind == 69) { lexer.NextToken(); //#line 3703 "VBNET.ATG" m.Add(ParameterModifiers.Ref); } else if (la.kind == 174) { lexer.NextToken(); //#line 3704 "VBNET.ATG" m.Add(ParameterModifiers.Optional); } else if (la.kind == 182) { lexer.NextToken(); //#line 3705 "VBNET.ATG" m.Add(ParameterModifiers.Params); } else SynErr(313); }
void FormalParameter( #line 2642 "VBNET.ATG" out ParameterDeclarationExpression p) { #line 2644 "VBNET.ATG" AttributeSection section; List<AttributeSection> attributes = new List<AttributeSection>(); TypeReference type = null; ParamModifierList mod = new ParamModifierList(this); Expression expr = null; p = null; ArrayList arrayModifiers = null; while (la.kind == 28) { AttributeSection( #line 2653 "VBNET.ATG" out section); #line 2653 "VBNET.ATG" attributes.Add(section); } while (StartOf(35)) { ParameterModifier( #line 2654 "VBNET.ATG" mod); } Identifier(); #line 2655 "VBNET.ATG" string parameterName = t.val; if ( #line 2656 "VBNET.ATG" IsDims()) { ArrayTypeModifiers( #line 2656 "VBNET.ATG" out arrayModifiers); } if (la.kind == 50) { lexer.NextToken(); TypeName( #line 2657 "VBNET.ATG" out type); } #line 2659 "VBNET.ATG" if(type != null) { if (arrayModifiers != null) { if (type.RankSpecifier != null) { Error("array rank only allowed one time"); } else { type.RankSpecifier = (int[])arrayModifiers.ToArray(typeof(int)); } } } else { type = new TypeReference("System.Object", arrayModifiers == null ? null : (int[])arrayModifiers.ToArray(typeof(int))); } if (la.kind == 10) { lexer.NextToken(); Expr( #line 2671 "VBNET.ATG" out expr); } #line 2673 "VBNET.ATG" mod.Check(); p = new ParameterDeclarationExpression(type, parameterName, mod.Modifier, expr); p.Attributes = attributes; }
void ParameterModifier( #line 3355 "VBNET.ATG" ParamModifierList m) { if (la.kind == 59) { lexer.NextToken(); #line 3356 "VBNET.ATG" m.Add(ParameterModifiers.In); } else if (la.kind == 56) { lexer.NextToken(); #line 3357 "VBNET.ATG" m.Add(ParameterModifiers.Ref); } else if (la.kind == 160) { lexer.NextToken(); #line 3358 "VBNET.ATG" m.Add(ParameterModifiers.Optional); } else if (la.kind == 167) { lexer.NextToken(); #line 3359 "VBNET.ATG" m.Add(ParameterModifiers.Params); } else SynErr(270); }
void ParameterModifier( #line 2867 "VBNET.ATG" ParamModifierList m) { if (la.kind == 55) { lexer.NextToken(); #line 2868 "VBNET.ATG" m.Add(ParameterModifiers.In); } else if (la.kind == 53) { lexer.NextToken(); #line 2869 "VBNET.ATG" m.Add(ParameterModifiers.Ref); } else if (la.kind == 137) { lexer.NextToken(); #line 2870 "VBNET.ATG" m.Add(ParameterModifiers.Optional); } else if (la.kind == 143) { lexer.NextToken(); #line 2871 "VBNET.ATG" m.Add(ParameterModifiers.Params); } else SynErr(252); }
public void Add(ParamModifierList m) { Add(m.cur); }
void FormalParameter( #line 2189 "VBNET.ATG" out ParameterDeclarationExpression p) { #line 2191 "VBNET.ATG" TypeReference type = null; ParamModifierList mod = new ParamModifierList(this); Expression expr = null; p = null;ArrayList arrayModifiers = null; while (StartOf(33)) { ParameterModifier( #line 2196 "VBNET.ATG" mod); } Identifier(); #line 2197 "VBNET.ATG" string parameterName = t.val; if ( #line 2198 "VBNET.ATG" IsDims()) { ArrayTypeModifiers( #line 2198 "VBNET.ATG" out arrayModifiers); } if (la.kind == 48) { lexer.NextToken(); TypeName( #line 2199 "VBNET.ATG" out type); } #line 2201 "VBNET.ATG" if(type != null) { if (arrayModifiers != null) { if (type.RankSpecifier != null) { Error("array rank only allowed one time"); } else { type.RankSpecifier = (int[])arrayModifiers.ToArray(typeof(int)); } } } else { type = new TypeReference("System.Object", arrayModifiers == null ? null : (int[])arrayModifiers.ToArray(typeof(int))); } if (la.kind == 11) { lexer.NextToken(); Expr( #line 2213 "VBNET.ATG" out expr); } #line 2215 "VBNET.ATG" mod.Check(); p = new ParameterDeclarationExpression(type, parameterName, mod.Modifier, expr); }
void ParameterModifier( #line 3713 "VBNET.ATG" ParamModifierList m) { if (la.kind == 74) { lexer.NextToken(); #line 3714 "VBNET.ATG" m.Add(ParameterModifiers.In); } else if (la.kind == 71) { lexer.NextToken(); #line 3715 "VBNET.ATG" m.Add(ParameterModifiers.Ref); } else if (la.kind == 177) { lexer.NextToken(); #line 3716 "VBNET.ATG" m.Add(ParameterModifiers.Optional); } else if (la.kind == 185) { lexer.NextToken(); #line 3717 "VBNET.ATG" m.Add(ParameterModifiers.Params); } else SynErr(317); }
void ParameterModifier( #line 3695 "VBNET.ATG" ParamModifierList m) { if (la.kind == 72) { lexer.NextToken(); #line 3696 "VBNET.ATG" m.Add(ParameterModifiers.In); } else if (la.kind == 69) { lexer.NextToken(); #line 3697 "VBNET.ATG" m.Add(ParameterModifiers.Ref); } else if (la.kind == 174) { lexer.NextToken(); #line 3698 "VBNET.ATG" m.Add(ParameterModifiers.Optional); } else if (la.kind == 182) { lexer.NextToken(); #line 3699 "VBNET.ATG" m.Add(ParameterModifiers.Params); } else SynErr(313); }
public void Add(ParamModifierList m) { Add(m.cur); }
void FormalParameter( #line 2883 "VBNET.ATG" out ParameterDeclarationExpression p) { #line 2885 "VBNET.ATG" AttributeSection section; List<AttributeSection> attributes = new List<AttributeSection>(); TypeReference type = null; ParamModifierList mod = new ParamModifierList(this); Expression expr = null; p = null; ArrayList arrayModifiers = null; while (la.kind == 40) { AttributeSection( #line 2894 "VBNET.ATG" out section); #line 2894 "VBNET.ATG" attributes.Add(section); } while (StartOf(48)) { ParameterModifier( #line 2895 "VBNET.ATG" mod); } Identifier(); #line 2896 "VBNET.ATG" string parameterName = t.val; if ( #line 2897 "VBNET.ATG" IsDims()) { ArrayTypeModifiers( #line 2897 "VBNET.ATG" out arrayModifiers); } if (la.kind == 63) { lexer.NextToken(); TypeName( #line 2898 "VBNET.ATG" out type); } #line 2900 "VBNET.ATG" if(type != null) { if (arrayModifiers != null) { if (type.RankSpecifier != null) { Error("array rank only allowed one time"); } else { type.RankSpecifier = (int[])arrayModifiers.ToArray(typeof(int)); } } } if (la.kind == 20) { lexer.NextToken(); Expr( #line 2910 "VBNET.ATG" out expr); } #line 2912 "VBNET.ATG" mod.Check(); p = new ParameterDeclarationExpression(type, parameterName, mod.Modifier, expr); p.Attributes = attributes; }