HomeSort by: relevance | last modified time | path
    Searched defs:mold_element (Results 1 - 2 of 2) sorted by relevancy

  /src/external/gpl3/gcc/dist/gcc/fortran/
simplify.cc 8262 gfc_expr *mold_element; local
8291 mold_element = (mold->expr_type == EXPR_ARRAY && mold->value.constructor)
8298 if (result->ts.type == BT_CHARACTER && gfc_is_constant_expr (mold_element))
8300 result->value.character.length = mold_element->value.character.length;
8304 if (mold_element->ts.u.cl->length)
8305 result->ts.u.cl->length = gfc_copy_expr (mold_element->ts.u.cl->length);
8309 mold_element->value.character.length);
  /src/external/gpl3/gcc.old/dist/gcc/fortran/
simplify.cc 8172 gfc_expr *mold_element; local
8201 mold_element = (mold->expr_type == EXPR_ARRAY && mold->value.constructor)
8208 if (result->ts.type == BT_CHARACTER && gfc_is_constant_expr (mold_element))
8210 result->value.character.length = mold_element->value.character.length;
8214 if (mold_element->ts.u.cl->length)
8215 result->ts.u.cl->length = gfc_copy_expr (mold_element->ts.u.cl->length);
8219 mold_element->value.character.length);

Completed in 63 milliseconds