re PR fortran/21594 ([4.0 only] FAIL: gfortran.dg/eoshift.f90 -O0 execution test)

2005-06-12  Thomas Koenig  <Thomas.Koenig@online.de>

        PR libfortran/21594
        * intrinsics/eoshift0.c:  Add prototype for eoshift0.
        * intrinsics/eoshift2.c:  Add prototype for eoshift2.

From-SVN: r100907

libgfortran/ChangeLog

+2005-06-12  Thomas Koenig  <Thomas.Koenig@online.de>
+
+	PR libfortran/21594
+	* intrinsics/eoshift0.c:  Add prototype for eoshift0.
+	* intrinsics/eoshift2.c:  Add prototype for eoshift2.
+
 2005-06-12  Steven G. Kargl <kargls@comcast.net>
 	    Thomas Koenig  <Thomas.Koenig@online.de>
 

libgfortran/intrinsics/eoshift0.c

@@ -41,6 +41,10 @@ static const char zeros[16] =
    sizeof(int) < sizeof (index_type).  */
 
 static void
+eoshift0 (gfc_array_char * , const gfc_array_char *,
+	  int, const char *, int);
+
+static void
 eoshift0 (gfc_array_char * ret, const gfc_array_char * array,
 	  int shift, const char * pbound, int which)
 {

libgfortran/intrinsics/eoshift2.c

@@ -41,6 +41,10 @@ static const char zeros[16] =
    sizeof(int) < sizeof (index_type).  */
 
 static void
+eoshift2 (gfc_array_char *, const gfc_array_char *,
+	  int, const gfc_array_char *, int );
+
+static void
 eoshift2 (gfc_array_char *ret, const gfc_array_char *array,
 	  int shift, const gfc_array_char *bound, int which)
 {