FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

libgfortran ChangeLog:

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

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

From-SVN: r107573
This commit is contained in:
Janne Blomqvist 2005-11-27 23:03:33 +02:00
parent 949446f557
commit 64acfd9910
186 changed files with 2734 additions and 1838 deletions
Download patch file Download diff file Expand all files Collapse all files

49
libgfortran/generated/eoshift1_16.c
View file

@ -37,9 +37,12 @@ Boston, MA 02110-1301, USA. */
#if defined (HAVE_GFC_INTEGER_16)
static void
eoshift1 (gfc_array_char *ret, const gfc_array_char *array, const gfc_array_i16 *h,
const char *pbound, const GFC_INTEGER_16 *pwhich, index_type size,
char filler)
eoshift1 (gfc_array_char * const restrict ret,
const gfc_array_char * const restrict array,
const gfc_array_i16 * const restrict h,
const char * const restrict pbound,
const GFC_INTEGER_16 * const restrict pwhich,
index_type size, char filler)
{
/* r.* indicates the return array. */
index_type rstride[GFC_MAX_DIMENSIONS];
@ -218,32 +221,40 @@ eoshift1 (gfc_array_char *ret, const gfc_array_char *array, const gfc_array_i16
}
}
void eoshift1_16 (gfc_array_char *, const gfc_array_char *,
const gfc_array_i16 *, const char *, const GFC_INTEGER_16 *);
void eoshift1_16 (gfc_array_char * const restrict,
const gfc_array_char * const restrict,
const gfc_array_i16 * const restrict, const char * const restrict,
const GFC_INTEGER_16 * const restrict);
export_proto(eoshift1_16);
void
eoshift1_16 (gfc_array_char *ret, const gfc_array_char *array,
const gfc_array_i16 *h, const char *pbound,
const GFC_INTEGER_16 *pwhich)
eoshift1_16 (gfc_array_char * const restrict ret,
const gfc_array_char * const restrict array,
const gfc_array_i16 * const restrict h,
const char * const restrict pbound,
const GFC_INTEGER_16 * const restrict pwhich)
{
eoshift1 (ret, array, h, pbound, pwhich, GFC_DESCRIPTOR_SIZE (array), 0);
}
void eoshift1_16_char (gfc_array_char *, GFC_INTEGER_4,
const gfc_array_char *, const gfc_array_i16 *,
const char *, const GFC_INTEGER_16 *,
GFC_INTEGER_4, GFC_INTEGER_4);
void eoshift1_16_char (gfc_array_char * const restrict,
GFC_INTEGER_4,
const gfc_array_char * const restrict,
const gfc_array_i16 * const restrict,
const char * const restrict,
const GFC_INTEGER_16 * const restrict,
GFC_INTEGER_4, GFC_INTEGER_4);
export_proto(eoshift1_16_char);
void
eoshift1_16_char (gfc_array_char *ret,
GFC_INTEGER_4 ret_length __attribute__((unused)),
const gfc_array_char *array, const gfc_array_i16 *h,
const char *pbound, const GFC_INTEGER_16 *pwhich,
GFC_INTEGER_4 array_length,
GFC_INTEGER_4 bound_length
__attribute__((unused)))
eoshift1_16_char (gfc_array_char * const restrict ret,
GFC_INTEGER_4 ret_length __attribute__((unused)),
const gfc_array_char * const restrict array,
const gfc_array_i16 * const restrict h,
const char * const restrict pbound,
const GFC_INTEGER_16 * const restrict pwhich,
GFC_INTEGER_4 array_length,
GFC_INTEGER_4 bound_length __attribute__((unused)))
{
eoshift1 (ret, array, h, pbound, pwhich, array_length, ' ');
}