private void ParseCall(ParseNode parent) // NonTerminalSymbol: Call
{
Token tok;
ParseNode n;
ParseNode node = parent.CreateNode(_scanner.GetToken(TokenType.Call), "Call");
parent.Nodes.Add(node);
tok = _scanner.LookAhead(TokenType.OPENPAREN, TokenType.OPENSQUARE); // Choice Rule
switch (tok.Type)
{
// Choice Rule
case TokenType.OPENPAREN:
// Concat Rule
tok = _scanner.Scan(TokenType.OPENPAREN); // Terminal Rule: OPENPAREN
n = node.CreateNode(tok, tok.ToString());
node.Token.UpdateRange(tok);
node.Nodes.Add(n);
if (tok.Type != TokenType.OPENPAREN)
{
tree.Errors.Add(
new ParseError("Unexpected token '" + tok.Text.Replace("\n", "") + "' found. Expected " + TokenType.OPENPAREN.ToString(), 0x1001, tok));
return;
}
// Concat Rule
tok = _scanner.LookAhead(TokenType.UNARY, TokenType.IDENTIFIER, TokenType.OPENCURLY, TokenType.NEW, TokenType.STRING, TokenType.INTEGER,
TokenType.REAL, TokenType.OPENPAREN); // Option Rule
if (tok.Type == TokenType.UNARY
|| tok.Type == TokenType.IDENTIFIER
|| tok.Type == TokenType.OPENCURLY
|| tok.Type == TokenType.NEW
|| tok.Type == TokenType.STRING
|| tok.Type == TokenType.INTEGER
|| tok.Type == TokenType.REAL
|| tok.Type == TokenType.OPENPAREN)
{
ParseValueList(node); // NonTerminal Rule: ValueList
}
// Concat Rule
tok = _scanner.Scan(TokenType.CLOSEPAREN); // Terminal Rule: CLOSEPAREN
n = node.CreateNode(tok, tok.ToString());
node.Token.UpdateRange(tok);
node.Nodes.Add(n);
if (tok.Type != TokenType.CLOSEPAREN)
{
tree.Errors.Add(
new ParseError("Unexpected token '" + tok.Text.Replace("\n", "") + "' found. Expected " + TokenType.CLOSEPAREN.ToString(), 0x1001,
tok));
return;
}
break;
case TokenType.OPENSQUARE:
// Concat Rule
tok = _scanner.Scan(TokenType.OPENSQUARE); // Terminal Rule: OPENSQUARE
n = node.CreateNode(tok, tok.ToString());
node.Token.UpdateRange(tok);
node.Nodes.Add(n);
if (tok.Type != TokenType.OPENSQUARE)
{
tree.Errors.Add(
new ParseError("Unexpected token '" + tok.Text.Replace("\n", "") + "' found. Expected " + TokenType.OPENSQUARE.ToString(), 0x1001,
tok));
return;
}
// Concat Rule
ParseValueList(node); // NonTerminal Rule: ValueList
// Concat Rule
tok = _scanner.Scan(TokenType.CLOSESQUARE); // Terminal Rule: CLOSESQUARE
n = node.CreateNode(tok, tok.ToString());
node.Token.UpdateRange(tok);
node.Nodes.Add(n);
if (tok.Type != TokenType.CLOSESQUARE)
{
tree.Errors.Add(
new ParseError("Unexpected token '" + tok.Text.Replace("\n", "") + "' found. Expected " + TokenType.CLOSESQUARE.ToString(), 0x1001,
tok));
return;
}
break;
default:
tree.Errors.Add(new ParseError("Unexpected token '" + tok.Text.Replace("\n", "") + "' found. Expected OPENPAREN or OPENSQUARE.", 0x0002,
tok));
break;
} // Choice Rule
parent.Token.UpdateRange(node.Token);
} // NonTerminalSymbol: Call