protected virtual BinaryArgumentNode ParseBinaryArgument(BinaryMessageNode parent, Token token)
{
// PARSE: <binary argument> ::= <primary> <unary message>*
BinaryArgumentNode result = new BinaryArgumentNode(parent);
IPrimaryNode primary = this.ParsePrimary(result, token);
if (primary == null)
{
this.ReportParserError(result, SemanticErrors.MissingPrimary, token);
return(result);
}
token = this.GetNextTokenxx(Preference.Default);
UnaryMessageSequenceNode messages = null;
if (token is IdentifierToken)
{
// <unary message>*
messages = this.ParseUnaryMessageSequence(result, (IdentifierToken)token);
}
else
{
this.ResidueToken = token;
}
result.SetContents(primary, messages);
return(result);
}
/// <summary>
/// Visits the Unary Message Sequence node.
/// </summary>
/// <param name="node">The node to visit.</param>
public virtual TResult VisitUnaryMessageSequence(UnaryMessageSequenceNode node)
{
if (node.Message != null)
{
node.Message.Accept(this);
}
if (node.NextMessage != null)
{
node.NextMessage.Accept(this);
}
return(default(TResult)); // The default naive implementation
}
/// <summary>
/// Visits the Unary Message Sequence node.
/// </summary>
/// <param name="node">The node to visit.</param>
public override bool VisitUnaryMessageSequence(UnaryMessageSequenceNode node)
{
if (node.Parent == null)
{
return(false);
}
if ((node.Message == null) || !node.Message.Accept(this))
{
return(false);
}
if ((node.NextMessage != null) && !node.NextMessage.Accept(this))
{
return(false);
}
return(true);
}
protected virtual UnaryMessageSequenceNode ParseUnaryMessageSequence(IMessageSequenceParentNode parent, IdentifierToken selector)
{
// PARSE: <unary message>*
UnaryMessageSequenceNode result = new UnaryMessageSequenceNode(parent);
// NB: ParseUnaryMessage() cannot fail, so we don't check result
UnaryMessageNode message = this.ParseUnaryMessage(result, selector);
Token token = this.GetNextTokenxx(Preference.Default);
UnaryMessageSequenceNode nextMessage = null;
if (token is IdentifierToken)
{
nextMessage = this.ParseUnaryMessageSequence(result, (IdentifierToken)token);
}
else
{
this.ResidueToken = token;
}
result.SetContents(message, nextMessage);
return(result);
}
/// <summary>
/// Visits the Unary Message Sequence node.
/// </summary>
/// <param name="node">The node to visit.</param>
public virtual TResult VisitUnaryMessageSequence(UnaryMessageSequenceNode node)
{
throw new NotImplementedException();
}
