/// <summary> /// The visit subroutine for references. /// A reference can point either to a function (when it's a function call) /// or a parameter of the currently visited function. /// </summary> public override VisitorResult VisitRefExp([NotNull] HaskellmmParser.RefExpContext context) { if (context.children[0].ChildCount == 0) { throw new VisitException(context, "RefExps are expected to contain grandchildren."); } var child = context.children[0]; string refName = child.GetChild(0).GetText(); if (currentFunction.Parameters.FindIndex(p => p.Name == refName) > -1) { AddParamReferenceNode(context, refName); } else { NodeContext nodeContext = CreateNodeContext(context); int parameterCount = child.ChildCount - 1; ExprNode node = new FunctionReferenceNode(nodeContext, refName, parameterCount); AddExprNode(node); if (parameterCount == 0) { currentNode = FindEarliestParentWithUnfilledChildren(currentNode); } } return(base.VisitRefExp(context)); }
/// <summary> /// Visit a parse tree produced by the <c>refExp</c> /// labeled alternative in <see cref="HaskellmmParser.expr"/>. /// <para> /// The default implementation returns the result of calling <see cref="AbstractParseTreeVisitor{Result}.VisitChildren(IRuleNode)"/> /// on <paramref name="context"/>. /// </para> /// </summary> /// <param name="context">The parse tree.</param> /// <return>The visitor result.</return> public virtual Result VisitRefExp([NotNull] HaskellmmParser.RefExpContext context) { return(VisitChildren(context)); }
/// <summary> /// Exit a parse tree produced by the <c>refExp</c> /// labeled alternative in <see cref="HaskellmmParser.expr"/>. /// <para>The default implementation does nothing.</para> /// </summary> /// <param name="context">The parse tree.</param> public virtual void ExitRefExp([NotNull] HaskellmmParser.RefExpContext context) { }