Home | History | Annotate | Download | only in fortran

Lines Matching defs:ubound

1061 	  GFC_TYPE_ARRAY_UBOUND (type, dim) = create_index_var ("ubound", nest);
1079 /* Don't try to use the unknown ubound for the last coarray dimension. */
1083 GFC_TYPE_ARRAY_UBOUND (type, dim) = create_index_var ("ubound", nest);
1148 tree lbound, ubound;
1150 ubound = GFC_TYPE_ARRAY_UBOUND (type, dim);
1151 rtype = build_range_type (gfc_array_index_type, lbound, ubound);
1156 the artificial lbound.N or ubound.N DECL_NAME doesn't
1169 if (ubound
1170 && VAR_P (ubound)
1171 && DECL_ARTIFICIAL (ubound)
1172 && DECL_IGNORED_P (ubound))
1174 if (DECL_NAME (ubound)
1175 && strstr (IDENTIFIER_POINTER (DECL_NAME (ubound)),
1176 "ubound") != 0)
1177 DECL_NAMELESS (ubound) = 1;
1178 DECL_IGNORED_P (ubound) = 0;
7160 /* Calculate offset + set lbound, ubound and stride. */
7196 /* gfc->dim[i].ubound = gfc->dim[i].lbound + cfi->dim[i].extent - 1. */
7413 /* cfi->dim[i].extent = gfc->dim[i].ubound - gfc->dim[i].lbound + 1. */