libgfortran ChangeLog:

2005-11-27  Janne Blomqvist  <jb@gcc.gnu.org>

	* m4/*: Add const restrict to function arguments.
	* generated/*.c: Regenerate.



git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107573 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 31 insertions, 23 deletions

diff --git a/libgfortran/generated/eoshift3_4.c b/libgfortran/generated/eoshift3_4.c
index 2b84ece377c..cfbf449901e 100644
--- a/libgfortran/generated/eoshift3_4.c
+++ b/libgfortran/generated/eoshift3_4.c
@@ -37,9 +37,12 @@ Boston, MA 02110-1301, USA.  */
 #if defined (HAVE_GFC_INTEGER_4)
 
 static void
-eoshift3 (gfc_array_char *ret, const gfc_array_char *array, const gfc_array_i4 *h,
-	  const gfc_array_char *bound, const GFC_INTEGER_4 *pwhich,
-	  index_type size, char filler)
+eoshift3 (gfc_array_char * const restrict ret, 
+	const gfc_array_char * const restrict array, 
+	const gfc_array_i4 * const restrict h,
+	const gfc_array_char * const restrict bound, 
+	const GFC_INTEGER_4 * const restrict pwhich,
+	index_type size, char filler)
 {
   /* r.* indicates the return array.  */
   index_type rstride[GFC_MAX_DIMENSIONS];
@@ -236,36 +239,41 @@ eoshift3 (gfc_array_char *ret, const gfc_array_char *array, const gfc_array_i4 *
     }
 }
 
-extern void eoshift3_4 (gfc_array_char *, const gfc_array_char *,
-				   const gfc_array_i4 *, const gfc_array_char *,
-				   const GFC_INTEGER_4 *);
+extern void eoshift3_4 (gfc_array_char * const restrict, 
+	const gfc_array_char * const restrict,
+	const gfc_array_i4 * const restrict, 
+	const gfc_array_char * const restrict,
+	const GFC_INTEGER_4 *);
 export_proto(eoshift3_4);
 
 void
-eoshift3_4 (gfc_array_char *ret, const gfc_array_char *array,
-		       const gfc_array_i4 *h, const gfc_array_char *bound,
-		       const GFC_INTEGER_4 *pwhich)
+eoshift3_4 (gfc_array_char * const restrict ret, 
+	const gfc_array_char * const restrict array,
+	const gfc_array_i4 * const restrict h, 
+	const gfc_array_char * const restrict bound,
+	const GFC_INTEGER_4 * const restrict pwhich)
 {
   eoshift3 (ret, array, h, bound, pwhich, GFC_DESCRIPTOR_SIZE (array), 0);
 }
 
-extern void eoshift3_4_char (gfc_array_char *, GFC_INTEGER_4,
-					  const gfc_array_char *,
-					  const gfc_array_i4 *,
-					  const gfc_array_char *,
-					  const GFC_INTEGER_4 *, GFC_INTEGER_4,
-					  GFC_INTEGER_4);
+extern void eoshift3_4_char (gfc_array_char * const restrict, 
+	GFC_INTEGER_4,
+	const gfc_array_char * const restrict,
+	const gfc_array_i4 * const restrict,
+	const gfc_array_char * const restrict,
+	const GFC_INTEGER_4 * const restrict, 
+	GFC_INTEGER_4, GFC_INTEGER_4);
 export_proto(eoshift3_4_char);
 
 void
-eoshift3_4_char (gfc_array_char *ret,
-			      GFC_INTEGER_4 ret_length __attribute__((unused)),
-			      const gfc_array_char *array, const gfc_array_i4 *h,
-			      const gfc_array_char *bound,
-			      const GFC_INTEGER_4 *pwhich,
-			      GFC_INTEGER_4 array_length,
-			      GFC_INTEGER_4 bound_length
-				__attribute__((unused)))
+eoshift3_4_char (gfc_array_char * const restrict ret,
+	GFC_INTEGER_4 ret_length __attribute__((unused)),
+	const gfc_array_char * const restrict array, 
+	const gfc_array_i4 *  const restrict h,
+	const gfc_array_char * const restrict bound,
+	const GFC_INTEGER_4 * const restrict pwhich,
+	GFC_INTEGER_4 array_length,
+	GFC_INTEGER_4 bound_length __attribute__((unused)))
 {
   eoshift3 (ret, array, h, bound, pwhich, array_length, ' ');
 }