Lines Matching defs:formal
450 next_sym->formal = next_arg;
1317 arg = next_sym[-1].formal;
4226 /* Given a formal argument list, remove any NULL arguments that may
4227 have been left behind by a sort against some formal argument list. */
4274 /* Given an actual arglist and a formal arglist, sort the actual
4283 gfc_intrinsic_arg *formal, locus *where)
4294 for (f = formal; f; f = f->next)
4300 f = formal;
4404 /* At this point, all unmatched formal args must be optional. */
4417 /* Using the formal argument list, string the actual argument list
4418 together in a way that corresponds with the formal list. */
4448 /* Compare an actual argument list with an intrinsic's formal argument
4457 gfc_intrinsic_arg *formal;
4460 formal = sym->formal;
4464 for (; formal; formal = formal->next, actual = actual->next, i++)
4471 ts = formal->ts;
4485 gfc_dummy_typename (&formal->ts));
4501 /* If the formal argument is INTENT([IN]OUT), check for definability. */
4502 if (formal->intent == INTENT_INOUT || formal->intent == INTENT_OUT)
4733 gfc_intrinsic_arg *formal;
4739 for (formal = isym->formal; formal; formal = formal->next)
4743 gfc_current_intrinsic_arg[i++] = formal;
4750 intrinsic's formal argument list. Return true if the expression
4774 if (!sort_actual (specific->name, ap, specific->formal, &expr->where))
5127 if (!isym->vararg && !sort_actual (name, &c->ext.actual, isym->formal, &c->loc))
Indexes created Sat Feb 28 05:31:39 UTC 2026