diff options
Diffstat (limited to 'libgfortran/m4/transpose.m4')
| -rw-r--r-- | libgfortran/m4/transpose.m4 | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/libgfortran/m4/transpose.m4 b/libgfortran/m4/transpose.m4 index 56669cecef1..98926607f99 100644 --- a/libgfortran/m4/transpose.m4 +++ b/libgfortran/m4/transpose.m4 @@ -35,11 +35,13 @@ include(iparm.m4)dnl `#if defined (HAVE_'rtype_name`)' -extern void transpose_`'rtype_code (rtype * ret, rtype * source); +extern void transpose_`'rtype_code (rtype * const restrict ret, + rtype * const restrict source); export_proto(transpose_`'rtype_code); void -transpose_`'rtype_code (rtype * ret, rtype * source) +transpose_`'rtype_code (rtype * const restrict ret, + rtype * const restrict source) { /* r.* indicates the return array. */ index_type rxstride, rystride; |