diff options
Diffstat (limited to 'libgfortran/m4/unpack.m4')
| -rw-r--r-- | libgfortran/m4/unpack.m4 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/m4/unpack.m4 b/libgfortran/m4/unpack.m4 index 2ad6841a081..fa2b5f1588b 100644 --- a/libgfortran/m4/unpack.m4 +++ b/libgfortran/m4/unpack.m4 @@ -46,7 +46,7 @@ unpack0_'rtype_code` ('rtype` *ret, const 'rtype` *vector, index_type rstride[GFC_MAX_DIMENSIONS]; index_type rstride0; index_type rs; - 'rtype_name` *rptr; + 'rtype_name` * restrict rptr; /* v.* indicates the vector array. */ index_type vstride0; 'rtype_name` *vptr; @@ -189,7 +189,7 @@ unpack1_'rtype_code` ('rtype` *ret, const 'rtype` *vector, index_type rstride[GFC_MAX_DIMENSIONS]; index_type rstride0; index_type rs; - 'rtype_name` *rptr; + 'rtype_name` * restrict rptr; /* v.* indicates the vector array. */ index_type vstride0; 'rtype_name` *vptr; |