public override LuaStatement Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.Function);
if (reader.Next.Value == LuaToken.Colon)
{
reader.MoveNext();
reader.MoveNext();
}
var functionName = reader.GetAndMoveNext();
reader.VerifyExpectedToken(LuaToken.LeftBracket);
var argumentNames = new List<string>();
reader.MoveNext();
while (reader.Current.Value != LuaToken.RightBracket)
{
argumentNames.Add(reader.Current.Value);
reader.MoveNext();
reader.VerifyExpectedToken(LuaToken.Comma, LuaToken.RightBracket);
if (reader.Current.Value == LuaToken.RightBracket)
break;
reader.MoveNext();
}
reader.VerifyExpectedTokenAndMoveNext(LuaToken.RightBracket);
var statementsParser = new StatementBlockParser(Keywords.End);
var body = statementsParser.ParseBlock(reader, context);
return new FunctionDeclarationStatement(functionName.Value,argumentNames,body);
}
public LuaStatement Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.Function);
if (reader.Next.Value == LuaToken.Colon)
{
reader.MoveNext();
reader.MoveNext();
}
var functionName = reader.GetAndMoveNext();
reader.VerifyExpectedToken(LuaToken.LeftBracket);
var argumentNames = new List <string>();
reader.MoveNext();
while (reader.Current.Value != LuaToken.RightBracket)
{
argumentNames.Add(reader.Current.Value);
reader.MoveNext();
reader.VerifyExpectedToken(LuaToken.Comma, LuaToken.RightBracket);
if (reader.Current.Value == LuaToken.RightBracket)
{
break;
}
reader.MoveNext();
}
reader.VerifyExpectedTokenAndMoveNext(LuaToken.RightBracket);
var statementsParser = new StatementBlockParser(Keywords.End);
var body = statementsParser.ParseBlock(reader, context);
return(new FunctionDeclarationStatement(functionName.Value, argumentNames, body));
}
public override LuaStatement Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.While);
var conditionExpression = SyntaxParser.ReadExpression(reader, context);
reader.VerifyExpectedTokenAndMoveNext(Keywords.Do);
var blockParser = new StatementBlockParser(Keywords.End);
var bodyBlock = blockParser.ParseBlock(reader, context);
return new WhileStatement(conditionExpression, bodyBlock);
}
public override LuaExpression Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(LuaToken.DoubleQuote, LuaToken.DoubleLeftSquareBracket);
var builder = new StringBuilder();
while (reader.HasNext && reader.Current.Value != LuaToken.DoubleQuote &&
reader.Current.Value != LuaToken.DoubleRightSquareBracket)
builder.Append(reader.GetAndMoveNext());
reader.VerifyExpectedTokenAndMoveNext(LuaToken.DoubleQuote, LuaToken.DoubleRightSquareBracket);
return new StringConstantExpression(builder.ToString());
}
public LuaStatement Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.While);
var conditionExpression = SyntaxParser.ReadExpression(reader, context);
reader.VerifyExpectedTokenAndMoveNext(Keywords.Do);
var blockParser = new StatementBlockParser(Keywords.End);
var bodyBlock = blockParser.ParseBlock(reader, context);
return(new WhileStatement(conditionExpression, bodyBlock));
}
public override LuaStatement Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.For);
var scope = context.AcquireScope();
reader.VerifyIsIdentifier();
var forVariableName = reader.GetAndMoveNext();
reader.VerifyExpectedTokenAndMoveNext(LuaToken.EqualsSign);
var conditionsParser = new ExpressionListParser();
var conditions = conditionsParser.Parse(reader, context).ToList();
reader.VerifyExpectedTokenAndMoveNext(Keywords.Do);
var statementsParser = new StatementBlockParser(Keywords.End);
var bodyBlock = statementsParser.ParseBlock(reader, context);
context.ReleaseScope(scope);
return new ForStatement(conditions,bodyBlock);
}
public LuaStatement Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.Return);
var returnedExpression = SyntaxParser.ReadExpression(reader, context);
return(new ReturnStatement(returnedExpression));
}
public override LuaExpression Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
var leftExpression = SyntaxParser.ReadExpression(reader,context);
var operation = reader.Current.Value;
reader.VerifyExpectedTokenAndMoveNext(LuaToken.BinaryOperations);
var rightExpression = SyntaxParser.ReadExpression(reader, context);
return new BinaryExpression(leftExpression,rightExpression, operation);
}
public override LuaStatement Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
StatementBlock elseBlock = null;
reader.VerifyExpectedTokenAndMoveNext(Keywords.If);
var conditionExpression = SyntaxParser.ReadExpression(reader, context);
reader.VerifyExpectedTokenAndMoveNext(Keywords.Then);
var ifBlockParser = new StatementBlockParser(Keywords.End, Keywords.Else);
Token delimiterToken;
var ifBlock = ifBlockParser.ParseBlock(reader, context, out delimiterToken);
if (delimiterToken.Value == Keywords.Else)
{
var elseBlockParser = new StatementBlockParser(Keywords.End);
elseBlock = elseBlockParser.ParseBlock(reader, context);
}
return new IfStatement(conditionExpression, ifBlock, elseBlock);
}
public virtual LuaExpression Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
var leftExpression = SyntaxParser.ReadExpression(reader, context);
var operation = reader.Current.Value;
reader.VerifyExpectedTokenAndMoveNext(LuaToken.BinaryOperations);
var rightExpression = SyntaxParser.ReadExpression(reader, context);
return(new BinaryExpression(leftExpression, rightExpression, operation));
}
public override LuaStatement Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
var variables = ReadDeclarations(reader);
foreach (var variable in variables)
context.CurrentScope.AddVariable(variable);
reader.VerifyExpectedTokenAndMoveNext(LuaToken.EqualsSign);
var assignedExpressionParser = new ExpressionListParser();
var expressions = assignedExpressionParser.Parse(reader, context);
return new Assignment(variables, expressions, _local);
}
public LuaStatement Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
StatementBlock elseBlock = null;
reader.VerifyExpectedTokenAndMoveNext(Keywords.If);
var conditionExpression = SyntaxParser.ReadExpression(reader, context);
reader.VerifyExpectedTokenAndMoveNext(Keywords.Then);
var ifBlockParser = new StatementBlockParser(Keywords.End, Keywords.Else);
Token delimiterToken;
var ifBlock = ifBlockParser.ParseBlock(reader, context, out delimiterToken);
if (delimiterToken.Value == Keywords.Else)
{
var elseBlockParser = new StatementBlockParser(Keywords.End);
elseBlock = elseBlockParser.ParseBlock(reader, context);
}
return(new IfStatement(conditionExpression, ifBlock, elseBlock));
}
public LuaStatement Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.For);
var scope = context.AcquireScope();
reader.VerifyIsIdentifier();
var forVariableName = reader.GetAndMoveNext();
reader.VerifyExpectedTokenAndMoveNext(LuaToken.EqualsSign);
var conditionsParser = new ExpressionListParser();
var conditions = conditionsParser.Parse(reader, context).ToList();
reader.VerifyExpectedTokenAndMoveNext(Keywords.Do);
var statementsParser = new StatementBlockParser(Keywords.End);
var bodyBlock = statementsParser.ParseBlock(reader, context);
context.ReleaseScope(scope);
return(new ForStatement(conditions, bodyBlock));
}
public override LuaStatement Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
var scope = context.AcquireScope();
reader.VerifyExpectedToken(Keywords.Do);
reader.MoveNext();
var statements = new List<LuaStatement>();
while (reader.Current.Value != Keywords.End)
statements.Add(SyntaxParser.ReadStatement(reader, context));
reader.VerifyExpectedTokenAndMoveNext(Keywords.End);
context.ReleaseScope(scope);
return new DoEndBlock(new StatementBlock(statements));
}
public StatementBlock ParseBlock(INextAwareEnumerator<Token> reader, IParserContext context, out Token terminationToken)
{
var statements = new List<LuaStatement>();
while (!_terminatingTokens.Contains(reader.Current.Value))
{
statements.Add(SyntaxParser.ReadStatement(reader, context));
while (string.IsNullOrEmpty(reader.Current.Value) || reader.Current.Value == "\n")
reader.MoveNext();
}
terminationToken = reader.Current;
reader.VerifyExpectedTokenAndMoveNext(_terminatingTokens);
return new StatementBlock(statements);
}
public LuaExpression Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
var name = reader.Current.Value;
reader.MoveNext();
reader.VerifyExpectedTokenAndMoveNext(LuaToken.LeftBracket);
var parametersParser = new ExpressionListParser();
var expression = new FunctionCallExpression(name, parametersParser.Parse(reader, context).ToList());
reader.VerifyExpectedToken(LuaToken.RightBracket);
return(expression);
}
public LuaStatement Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
var variables = ReadDeclarations(reader);
foreach (var variable in variables)
{
context.CurrentScope.AddVariable(variable);
}
reader.VerifyExpectedTokenAndMoveNext(LuaToken.EqualsSign);
var assignedExpressionParser = new ExpressionListParser();
var expressions = assignedExpressionParser.Parse(reader, context);
return(new Assignment(variables, expressions, _local));
}
public LuaStatement Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
var scope = context.AcquireScope();
reader.VerifyExpectedToken(Keywords.Do);
reader.MoveNext();
var statements = new List <LuaStatement>();
while (reader.Current.Value != Keywords.End)
{
statements.Add(SyntaxParser.ReadStatement(reader, context));
}
reader.VerifyExpectedTokenAndMoveNext(Keywords.End);
context.ReleaseScope(scope);
return(new DoEndBlock(new StatementBlock(statements)));
}
public StatementBlock ParseBlock(INextAwareEnumerator <Token> reader, IParserContext context,
out Token terminationToken)
{
var statements = new List <LuaStatement>();
while (!_terminatingTokens.Contains(reader.Current.Value))
{
statements.Add(SyntaxParser.ReadStatement(reader, context));
while (string.IsNullOrEmpty(reader.Current.Value) || reader.Current.Value == "\n")
{
reader.MoveNext();
}
}
terminationToken = reader.Current;
reader.VerifyExpectedTokenAndMoveNext(_terminatingTokens);
return(new StatementBlock(statements));
}
public LuaExpression Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
reader.VerifyExpectedToken(LuaToken.LeftCurlyBrace);
reader.MoveNext();
var expressions = Enumerable.Empty <LuaExpression>();
if (reader.Current.Value != LuaToken.RightCurlyBrace)
{
var parser = new ExpressionListParser();
expressions = parser.Parse(reader, context);
reader.VerifyExpectedToken(LuaToken.RightCurlyBrace);
reader.MoveNext();
}
else
{
reader.VerifyExpectedTokenAndMoveNext(LuaToken.RightCurlyBrace);
}
return(new TableInitializerExpression(expressions));
}
public LuaExpression Parse(INextAwareEnumerator <Token> reader, IParserContext context)
{
var tableName = reader.Current.Value;
LuaExpression indexerExpression;
reader.MoveNext();
if (reader.Current.Value == LuaToken.Dot)
{
reader.MoveNext();
indexerExpression = new StringConstantExpression(reader.Current.Value);
}
else if (reader.Current.Value == LuaToken.LeftSquareBracket)
{
reader.MoveNext();
indexerExpression = SyntaxParser.ReadExpression(reader, context);
reader.VerifyExpectedTokenAndMoveNext(LuaToken.RightSquareBracket);
}
else
{
throw new UnexpectedTokenException(reader.Current, LuaToken.Dot, LuaToken.LeftSquareBracket);
}
return(new TableIndexExpression(new Variable(tableName), indexerExpression));
}
public override LuaStatement Parse(INextAwareEnumerator<Token> reader, IParserContext context)
{
reader.VerifyExpectedTokenAndMoveNext(Keywords.Return);
var returnedExpression = SyntaxParser.ReadExpression(reader, context);
return new ReturnStatement(returnedExpression);
}
