void nameFuncCallStmnt(t_tree node)
{
checkIdUndefined(node->Node.FuncCallStmnt.FuncName, node->LineNr);
nameActual(node->Node.FuncCallStmnt.Actuals, 1);
nameStmnt(node->Node.Stmnt.Next);
}
void nameFuncCallExpr(t_tree node)
{
if (nameCurrentPrimitive == NULL)
checkIdUndefined(node->Node.FuncCallExpr.FuncName, node->LineNr);
else
checkIdUndefinedInPrimitive(&node->Node.FuncCallExpr.FuncName, node->LineNr);
nameActual(node->Node.FuncCallExpr.Actuals, 1);
}
void nameActual(t_tree node, int number)
{
if (node == NULL)
return;
// this sets up the order of the actuals so we know
// which Actual to match up with which Formal.
node->Node.Actual.Number = number;
nameExpr(node->Node.Actual.Expr);
nameActual(node->Node.Actual.Next, number + 1);
}
void nameFuncCallExpr(t_tree node)
{
checkIdUndefined(node->Node.FuncCallExpr.FuncName, node->LineNr);
nameActual(node->Node.FuncCallExpr.Actuals, 1);
}
