public override object VisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data)
{
if (nameComparer.Equals(from, parameterDeclarationExpression.ParameterName)) {
parameterDeclarationExpression.ParameterName = to;
}
return base.VisitParameterDeclarationExpression(parameterDeclarationExpression, data);
}
public virtual object VisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data) {
Debug.Assert((parameterDeclarationExpression != null));
Debug.Assert((parameterDeclarationExpression.Attributes != null));
Debug.Assert((parameterDeclarationExpression.TypeReference != null));
Debug.Assert((parameterDeclarationExpression.DefaultValue != null));
foreach (AttributeSection o in parameterDeclarationExpression.Attributes) {
Debug.Assert(o != null);
o.AcceptVisitor(this, data);
}
parameterDeclarationExpression.TypeReference.AcceptVisitor(this, data);
return parameterDeclarationExpression.DefaultValue.AcceptVisitor(this, data);
}
void LambdaExpressionParameter(
#line 2127 "Frames/cs.ATG"
out ParameterDeclarationExpression p) {
#line 2128 "Frames/cs.ATG"
Location start = la.Location; p = null;
TypeReference type;
ParameterModifiers mod = ParameterModifiers.In;
if (
#line 2133 "Frames/cs.ATG"
Peek(1).kind == Tokens.Comma || Peek(1).kind == Tokens.CloseParenthesis) {
Identifier();
#line 2135 "Frames/cs.ATG"
p = new ParameterDeclarationExpression(null, t.val);
p.StartLocation = start; p.EndLocation = t.EndLocation;
} else if (StartOf(18)) {
if (la.kind == 93 || la.kind == 100) {
if (la.kind == 100) {
lexer.NextToken();
#line 2138 "Frames/cs.ATG"
mod = ParameterModifiers.Ref;
} else {
lexer.NextToken();
#line 2139 "Frames/cs.ATG"
mod = ParameterModifiers.Out;
}
}
Type(
#line 2141 "Frames/cs.ATG"
out type);
Identifier();
#line 2143 "Frames/cs.ATG"
p = new ParameterDeclarationExpression(type, t.val, mod);
p.StartLocation = start; p.EndLocation = t.EndLocation;
} else SynErr(213);
}
void FixedParameter(
#line 664 "Frames/cs.ATG"
out ParameterDeclarationExpression p) {
#line 666 "Frames/cs.ATG"
TypeReference type;
ParameterModifiers mod = ParameterModifiers.In;
Location start = la.Location;
Expression defaultParameterExpr = null;
if (la.kind == 93 || la.kind == 100) {
if (la.kind == 100) {
lexer.NextToken();
#line 673 "Frames/cs.ATG"
mod = ParameterModifiers.Ref;
} else {
lexer.NextToken();
#line 674 "Frames/cs.ATG"
mod = ParameterModifiers.Out;
}
}
Type(
#line 676 "Frames/cs.ATG"
out type);
Identifier();
#line 676 "Frames/cs.ATG"
p = new ParameterDeclarationExpression(type, t.val, mod); p.StartLocation = start; p.EndLocation = t.Location;
if (la.kind == 3) {
lexer.NextToken();
Expr(
#line 677 "Frames/cs.ATG"
out defaultParameterExpr);
}
}
void ParameterArray(
#line 680 "Frames/cs.ATG"
out ParameterDeclarationExpression p) {
#line 681 "Frames/cs.ATG"
TypeReference type;
Expect(95);
Type(
#line 683 "Frames/cs.ATG"
out type);
Identifier();
#line 683 "Frames/cs.ATG"
p = new ParameterDeclarationExpression(type, t.val, ParameterModifiers.Params);
}
public virtual object TrackedVisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data) {
return base.VisitParameterDeclarationExpression(parameterDeclarationExpression, data);
}
public sealed override object VisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data) {
this.BeginVisit(parameterDeclarationExpression);
object result = this.TrackedVisitParameterDeclarationExpression(parameterDeclarationExpression, data);
this.EndVisit(parameterDeclarationExpression);
return result;
}
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;
}
public virtual object VisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data) {
Debug.Assert((parameterDeclarationExpression != null));
Debug.Assert((parameterDeclarationExpression.Attributes != null));
Debug.Assert((parameterDeclarationExpression.TypeReference != null));
Debug.Assert((parameterDeclarationExpression.DefaultValue != null));
for (int i = 0; i < parameterDeclarationExpression.Attributes.Count; i++) {
AttributeSection o = parameterDeclarationExpression.Attributes[i];
Debug.Assert(o != null);
nodeStack.Push(o);
o.AcceptVisitor(this, data);
o = (AttributeSection)nodeStack.Pop();
if (o == null)
parameterDeclarationExpression.Attributes.RemoveAt(i--);
else
parameterDeclarationExpression.Attributes[i] = o;
}
nodeStack.Push(parameterDeclarationExpression.TypeReference);
parameterDeclarationExpression.TypeReference.AcceptVisitor(this, data);
parameterDeclarationExpression.TypeReference = ((TypeReference)(nodeStack.Pop()));
nodeStack.Push(parameterDeclarationExpression.DefaultValue);
parameterDeclarationExpression.DefaultValue.AcceptVisitor(this, data);
parameterDeclarationExpression.DefaultValue = ((Expression)(nodeStack.Pop()));
return null;
}
public override object VisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data)
{
curBlock.Add(parameterDeclarationExpression.ParameterName);
//print("add parameter ${parameterDeclarationExpression.ParameterName} to block")
return base.VisitParameterDeclarationExpression(parameterDeclarationExpression, data);
}
public virtual object VisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data) {
throw new global::System.NotImplementedException("ParameterDeclarationExpression");
}
public override object VisitParameterDeclarationExpression(ParameterDeclarationExpression parameterDeclarationExpression, object data)
{
CodeParameterDeclarationExpression parameter = new CodeParameterDeclarationExpression(ConvType(parameterDeclarationExpression.TypeReference), parameterDeclarationExpression.ParameterName);
parameters.Add(parameter);
return parameter;
}
