diff options
Diffstat (limited to 'libgfortran/generated/reshape_c10.c')
| -rw-r--r-- | libgfortran/generated/reshape_c10.c | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/libgfortran/generated/reshape_c10.c b/libgfortran/generated/reshape_c10.c index 30988e8..21789f8 100644 --- a/libgfortran/generated/reshape_c10.c +++ b/libgfortran/generated/reshape_c10.c @@ -40,13 +40,19 @@ typedef GFC_ARRAY_DESCRIPTOR(1, index_type) shape_type; /* The shape parameter is ignored. We can currently deduce the shape from the return array. */ -extern void reshape_c10 (gfc_array_c10 *, gfc_array_c10 *, shape_type *, - gfc_array_c10 *, shape_type *); +extern void reshape_c10 (gfc_array_c10 * const restrict, + gfc_array_c10 * const restrict, + shape_type * const restrict, + gfc_array_c10 * const restrict, + shape_type * const restrict); export_proto(reshape_c10); void -reshape_c10 (gfc_array_c10 * ret, gfc_array_c10 * source, shape_type * shape, - gfc_array_c10 * pad, shape_type * order) +reshape_c10 (gfc_array_c10 * const restrict ret, + gfc_array_c10 * const restrict source, + shape_type * const restrict shape, + gfc_array_c10 * const restrict pad, + shape_type * const restrict order) { /* r.* indicates the return array. */ index_type rcount[GFC_MAX_DIMENSIONS]; |