Searched refs:rhsptr (Results 1 - 1 of 1) sorted by relevance

/haiku-buildtools/gcc/gcc/fortran/
H A Dresolve.c9325 gfc_expr** rhsptr; local
9330 rhsptr = &code->ext.actual->next->expr;
9341 rhsptr = &args->next->expr;
9349 if ((*rhsptr)->expr_type == EXPR_VARIABLE
9350 && (*rhsptr)->symtree->n.sym->ts.type == BT_DERIVED
9351 && gfc_has_default_initializer ((*rhsptr)->symtree->n.sym->ts.u.derived)
9352 && (lhs->symtree->n.sym == (*rhsptr)->symtree->n.sym))
9353 *rhsptr = gfc_get_parentheses (*rhsptr);

Completed in 114 milliseconds