Searched refs:declared_bound (Results 1 – 2 of 2) sorted by relevance
4068 gfc_expr *declared_bound; in simplify_bound_dim() local4081 declared_bound = upper ? u : l; in simplify_bound_dim()4093 if (mpz_cmp_si (declared_bound->value.integer, empty_bound) == 0) in simplify_bound_dim()4101 mpz_set (result->value.integer, declared_bound->value.integer); in simplify_bound_dim()4104 mpz_set (result->value.integer, declared_bound->value.integer); in simplify_bound_dim()
4035 gfc_expr *declared_bound; in simplify_bound_dim() local4048 declared_bound = upper ? u : l; in simplify_bound_dim()4060 if (mpz_cmp_si (declared_bound->value.integer, empty_bound) == 0) in simplify_bound_dim()4068 mpz_set (result->value.integer, declared_bound->value.integer); in simplify_bound_dim()4071 mpz_set (result->value.integer, declared_bound->value.integer); in simplify_bound_dim()