Searched refs:bnd_ctor (Results 1 – 2 of 2) sorted by relevance
2486 gfc_constructor *array_ctor, *shift_ctor, *bnd_ctor; in gfc_simplify_eoshift() local2611 bnd_ctor = gfc_constructor_first (bnd->value.constructor); in gfc_simplify_eoshift()2613 bnd_ctor = NULL; in gfc_simplify_eoshift()2683 if (bnd_ctor) in gfc_simplify_eoshift()2687 *dest = gfc_copy_expr (bnd_ctor->expr); in gfc_simplify_eoshift()2704 if (bnd_ctor) in gfc_simplify_eoshift()2705 bnd_ctor = gfc_constructor_next (bnd_ctor); in gfc_simplify_eoshift()
2453 gfc_constructor *array_ctor, *shift_ctor, *bnd_ctor; in gfc_simplify_eoshift() local2578 bnd_ctor = gfc_constructor_first (bnd->value.constructor); in gfc_simplify_eoshift()2580 bnd_ctor = NULL; in gfc_simplify_eoshift()2650 if (bnd_ctor) in gfc_simplify_eoshift()2654 *dest = gfc_copy_expr (bnd_ctor->expr); in gfc_simplify_eoshift()2671 if (bnd_ctor) in gfc_simplify_eoshift()2672 bnd_ctor = gfc_constructor_next (bnd_ctor); in gfc_simplify_eoshift()