void SwitchLabel(
#line 1714 "Frames/cs.ATG"
out CaseLabel label) {
#line 1715 "Frames/cs.ATG"
Expression expr = null; label = null;
if (la.kind == 55) {
lexer.NextToken();
Expr(
#line 1717 "Frames/cs.ATG"
out expr);
Expect(9);
#line 1717 "Frames/cs.ATG"
label = new CaseLabel(expr);
} else if (la.kind == 63) {
lexer.NextToken();
Expect(9);
#line 1718 "Frames/cs.ATG"
label = new CaseLabel();
} else SynErr(204);
}
public virtual object VisitCaseLabel(CaseLabel caseLabel, object data) {
Debug.Assert((caseLabel != null));
Debug.Assert((caseLabel.Label != null));
Debug.Assert((caseLabel.ToExpression != null));
caseLabel.Label.AcceptVisitor(this, data);
return caseLabel.ToExpression.AcceptVisitor(this, data);
}
public virtual object TrackedVisitCaseLabel(CaseLabel caseLabel, object data) {
return base.VisitCaseLabel(caseLabel, data);
}
public sealed override object VisitCaseLabel(CaseLabel caseLabel, object data) {
this.BeginVisit(caseLabel);
object result = this.TrackedVisitCaseLabel(caseLabel, data);
this.EndVisit(caseLabel);
return result;
}
void CaseClause(
#line 3188 "VBNET.ATG"
out CaseLabel caseClause) {
#line 3190 "VBNET.ATG"
Expression expr = null;
Expression sexpr = null;
BinaryOperatorType op = BinaryOperatorType.None;
caseClause = null;
if (la.kind == 98) {
lexer.NextToken();
#line 3196 "VBNET.ATG"
caseClause = new CaseLabel();
} else if (StartOf(43)) {
if (la.kind == 131) {
lexer.NextToken();
}
switch (la.kind) {
case 28: {
lexer.NextToken();
#line 3200 "VBNET.ATG"
op = BinaryOperatorType.LessThan;
break;
}
case 27: {
lexer.NextToken();
#line 3201 "VBNET.ATG"
op = BinaryOperatorType.GreaterThan;
break;
}
case 31: {
lexer.NextToken();
#line 3202 "VBNET.ATG"
op = BinaryOperatorType.LessThanOrEqual;
break;
}
case 30: {
lexer.NextToken();
#line 3203 "VBNET.ATG"
op = BinaryOperatorType.GreaterThanOrEqual;
break;
}
case 10: {
lexer.NextToken();
#line 3204 "VBNET.ATG"
op = BinaryOperatorType.Equality;
break;
}
case 29: {
lexer.NextToken();
#line 3205 "VBNET.ATG"
op = BinaryOperatorType.InEquality;
break;
}
default: SynErr(285); break;
}
Expr(
#line 3207 "VBNET.ATG"
out expr);
#line 3209 "VBNET.ATG"
caseClause = new CaseLabel(op, expr);
} else if (StartOf(29)) {
Expr(
#line 3211 "VBNET.ATG"
out expr);
if (la.kind == 201) {
lexer.NextToken();
Expr(
#line 3211 "VBNET.ATG"
out sexpr);
}
#line 3213 "VBNET.ATG"
caseClause = new CaseLabel(expr, sexpr);
} else SynErr(286);
}
public virtual object VisitCaseLabel(CaseLabel caseLabel, object data) {
Debug.Assert((caseLabel != null));
Debug.Assert((caseLabel.Label != null));
Debug.Assert((caseLabel.ToExpression != null));
nodeStack.Push(caseLabel.Label);
caseLabel.Label.AcceptVisitor(this, data);
caseLabel.Label = ((Expression)(nodeStack.Pop()));
nodeStack.Push(caseLabel.ToExpression);
caseLabel.ToExpression.AcceptVisitor(this, data);
caseLabel.ToExpression = ((Expression)(nodeStack.Pop()));
return null;
}
public virtual object VisitCaseLabel(CaseLabel caseLabel, object data) {
throw new global::System.NotImplementedException("CaseLabel");
}
