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

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

diff --git a/libgfortran/generated/in_pack_r4.c b/libgfortran/generated/in_pack_r4.c
index a1f352c..eb68180 100644 (file)
--- a/libgfortran/generated/in_pack_r4.c
+++ b/libgfortran/generated/in_pack_r4.c
@@ -48,7 +48,7 @@ internal_pack_r4 (gfc_array_r4 * source)
   index_type dim;
   index_type ssize;
   const GFC_REAL_4 *src;
-  GFC_REAL_4 *dest;
+  GFC_REAL_4 * restrict dest;
   GFC_REAL_4 *destptr;
   int n;
   int packed;