public override IMatched <Unit> Parse(ParseState state, Token[] tokens, ExpressionBuilder builder)
{
var functionName = tokens[2].Text;
if (functionName == @"\/")
{
return(notMatched <Unit>());
}
else
{
state.Colorize(tokens, Color.Whitespace, Color.Invokable, Color.OpenParenthesis);
if (getArgumentsPlusLambda(state, builder.Flags).ValueOrCast <Unit>(out var tuple, out var asUnit))
{
var(arguments, possibleLambda) = tuple;
if (state.BlockFollows())
{
state.Scan("^ /':'", Color.Structure);
if (state.Advance().ValueOrOriginal(out _, out var unitMatched))
{
var tempObjectField = newLabel("object");
var outerBuilder = new ExpressionBuilder(ExpressionFlags.Standard);
var setPropertyParser = new SetPropertyParser(builder, tempObjectField, outerBuilder);
while (state.More)
{
if (setPropertyParser.Scan(state).If(out _, out var anyException))
{
}
else if (anyException.If(out var exception))
{
return(failedMatch <Unit>(exception));
}
else
{
break;
}
}
state.Regress();
if (outerBuilder.ToExpression().If(out var outerExpression, out var outerException))
{
builder.Add(new NewObjectSymbol(tempObjectField, functionName, outerExpression));
}
else
{
return(failedMatch <Unit>(outerException));
}
}
else
{
return(unitMatched);
}
}
else if (state.Macro(functionName).If(out var function))
{
builder.Add(new MacroInvokeSymbol(function, arguments));
}
else
{
builder.Add(new InvokeSymbol(functionName, arguments, possibleLambda, builder.Flags[ExpressionFlags.Comparisand]));
}
return(Unit.Matched());
}
