2008-05-18 Thomas Koenig <tkoenig@gcc.gnu.org>

[pf3gnuchains/gcc-fork.git] / libgfortran / generated / unpack_i16.c

diff --git a/libgfortran/generated/unpack_i16.c b/libgfortran/generated/unpack_i16.c
index 0fbd744..2adf060 100644 (file)
--- a/libgfortran/generated/unpack_i16.c
+++ b/libgfortran/generated/unpack_i16.c
@@ -45,7 +45,7 @@ unpack0_i16 (gfc_array_i16 *ret, const gfc_array_i16 *vector,
   index_type rstride[GFC_MAX_DIMENSIONS];
   index_type rstride0;
   index_type rs;
-  GFC_INTEGER_16 *rptr;
+  GFC_INTEGER_16 * restrict rptr;
   /* v.* indicates the vector array.  */
   index_type vstride0;
   GFC_INTEGER_16 *vptr;
@@ -188,7 +188,7 @@ unpack1_i16 (gfc_array_i16 *ret, const gfc_array_i16 *vector,
   index_type rstride[GFC_MAX_DIMENSIONS];
   index_type rstride0;
   index_type rs;
-  GFC_INTEGER_16 *rptr;
+  GFC_INTEGER_16 * restrict rptr;
   /* v.* indicates the vector array.  */
   index_type vstride0;
   GFC_INTEGER_16 *vptr;