diff options
Diffstat (limited to 'libgfortran/generated/cshift1_8.c')
| -rw-r--r-- | libgfortran/generated/cshift1_8.c | 41 |
1 files changed, 25 insertions, 16 deletions
diff --git a/libgfortran/generated/cshift1_8.c b/libgfortran/generated/cshift1_8.c index 3a7c509b00c..d8d0f898377 100644 --- a/libgfortran/generated/cshift1_8.c +++ b/libgfortran/generated/cshift1_8.c @@ -37,8 +37,11 @@ Boston, MA 02110-1301, USA. */ #if defined (HAVE_GFC_INTEGER_8) static void -cshift1 (gfc_array_char * ret, const gfc_array_char * array, - const gfc_array_i8 * h, const GFC_INTEGER_8 * pwhich, index_type size) +cshift1 (gfc_array_char * const restrict ret, + const gfc_array_char * const restrict array, + const gfc_array_i8 * const restrict h, + const GFC_INTEGER_8 * const restrict pwhich, + index_type size) { /* r.* indicates the return array. */ index_type rstride[GFC_MAX_DIMENSIONS]; @@ -194,30 +197,36 @@ cshift1 (gfc_array_char * ret, const gfc_array_char * array, } } -void cshift1_8 (gfc_array_char *, const gfc_array_char *, - const gfc_array_i8 *, const GFC_INTEGER_8 *); +void cshift1_8 (gfc_array_char * const restrict, + const gfc_array_char * const restrict, + const gfc_array_i8 * const restrict, + const GFC_INTEGER_8 * const restrict); export_proto(cshift1_8); void -cshift1_8 (gfc_array_char * ret, - const gfc_array_char * array, - const gfc_array_i8 * h, const GFC_INTEGER_8 * pwhich) +cshift1_8 (gfc_array_char * const restrict ret, + const gfc_array_char * const restrict array, + const gfc_array_i8 * const restrict h, + const GFC_INTEGER_8 * const restrict pwhich) { cshift1 (ret, array, h, pwhich, GFC_DESCRIPTOR_SIZE (array)); } -void cshift1_8_char (gfc_array_char * ret, GFC_INTEGER_4, - const gfc_array_char * array, - const gfc_array_i8 * h, const GFC_INTEGER_8 * pwhich, - GFC_INTEGER_4); +void cshift1_8_char (gfc_array_char * const restrict ret, + GFC_INTEGER_4, + const gfc_array_char * const restrict array, + const gfc_array_i8 * const restrict h, + const GFC_INTEGER_8 * const restrict pwhich, + GFC_INTEGER_4); export_proto(cshift1_8_char); void -cshift1_8_char (gfc_array_char * ret, - GFC_INTEGER_4 ret_length __attribute__((unused)), - const gfc_array_char * array, - const gfc_array_i8 * h, const GFC_INTEGER_8 * pwhich, - GFC_INTEGER_4 array_length) +cshift1_8_char (gfc_array_char * const restrict ret, + GFC_INTEGER_4 ret_length __attribute__((unused)), + const gfc_array_char * const restrict array, + const gfc_array_i8 * const restrict h, + const GFC_INTEGER_8 * const restrict pwhich, + GFC_INTEGER_4 array_length) { cshift1 (ret, array, h, pwhich, array_length); } |