diff options
Diffstat (limited to 'libgfortran/intrinsics/unpack_generic.c')
| -rw-r--r-- | libgfortran/intrinsics/unpack_generic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/intrinsics/unpack_generic.c b/libgfortran/intrinsics/unpack_generic.c index 86cef6725d2..1800be4ce65 100644 --- a/libgfortran/intrinsics/unpack_generic.c +++ b/libgfortran/intrinsics/unpack_generic.c @@ -42,7 +42,7 @@ unpack_internal (gfc_array_char *ret, const gfc_array_char *vector, index_type rstride[GFC_MAX_DIMENSIONS]; index_type rstride0; index_type rs; - char *rptr; + char * restrict rptr; /* v.* indicates the vector array. */ index_type vstride0; char *vptr; |