protected virtual UnaryBinaryMessageSequenceNode ParseUnaryBinaryMessageSequence(IMessageSequenceParentNode parent, IdentifierToken selector)
{
// PARSE: <unary message>* <binary message>*
UnaryBinaryMessageSequenceNode result = new UnaryBinaryMessageSequenceNode(parent);
// NB: ParseUnaryMessage() cannot fail, so we don't check result
UnaryMessageNode message = this.ParseUnaryMessage(result, selector);
Token token = this.GetNextTokenxx(Preference.Default);
BinaryOrBinaryUnaryMessageSequenceNode nextMessage = null;
if (token is IdentifierToken)
{
// <unary message>*
nextMessage = this.ParseUnaryBinaryMessageSequence(result, (IdentifierToken)token);
}
else if (token is BinarySelectorToken)
{
// <binary message>*
nextMessage = this.ParseBinaryMessageSequence(result, (BinarySelectorToken)token);
}
else
{
this.ResidueToken = token;
}
result.SetContents(message, nextMessage);
return(result);
}
