Home
last modified time | relevance | path

Searched refs:typespec_chararray_ctor (Results 1 – 3 of 3) sorted by relevance

/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans-array.c1759 static bool typespec_chararray_ctor; variable
1802 if ((gfc_option.rtcheck & GFC_RTCHECK_BOUNDS) && !typespec_chararray_ctor) in gfc_trans_array_ctor_element()
2649 old_typespec_chararray_ctor = typespec_chararray_ctor; in trans_array_constructor()
2658 typespec_chararray_ctor = (expr->ts.type == BT_CHARACTER in trans_array_constructor()
2663 && expr->ts.type == BT_CHARACTER && !typespec_chararray_ctor) in trans_array_constructor()
2680 if (typespec_chararray_ctor && expr->ts.u.cl->length in trans_array_constructor()
2839 typespec_chararray_ctor = old_typespec_chararray_ctor; in trans_array_constructor()
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans-array.cc1855 static bool typespec_chararray_ctor; variable
1898 if ((gfc_option.rtcheck & GFC_RTCHECK_BOUNDS) && !typespec_chararray_ctor) in gfc_trans_array_ctor_element()
2745 old_typespec_chararray_ctor = typespec_chararray_ctor; in trans_array_constructor()
2754 typespec_chararray_ctor = (expr->ts.type == BT_CHARACTER in trans_array_constructor()
2759 && expr->ts.type == BT_CHARACTER && !typespec_chararray_ctor) in trans_array_constructor()
2776 if (typespec_chararray_ctor && expr->ts.u.cl->length in trans_array_constructor()
2935 typespec_chararray_ctor = old_typespec_chararray_ctor; in trans_array_constructor()
H A DChangeLog-20082628 * trans-array.c: New static global variable "typespec_chararray_ctor"