diff options
Diffstat (limited to 'libgfortran/m4/eoshift3.m4')
| -rw-r--r-- | libgfortran/m4/eoshift3.m4 | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/libgfortran/m4/eoshift3.m4 b/libgfortran/m4/eoshift3.m4 index 4e706dc..0ded29e 100644 --- a/libgfortran/m4/eoshift3.m4 +++ b/libgfortran/m4/eoshift3.m4 @@ -29,15 +29,15 @@ include(iparm.m4)dnl static const char zeros[16] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}; -extern void __eoshift3_`'atype_kind (gfc_array_char *, gfc_array_char *, +extern void eoshift3_`'atype_kind (gfc_array_char *, gfc_array_char *, atype *, const gfc_array_char *, atype_name *); -export_proto_np(__eoshift3_`'atype_kind); +export_proto(eoshift3_`'atype_kind); void -__eoshift3_`'atype_kind (gfc_array_char *ret, gfc_array_char *array, - atype *h, const gfc_array_char *bound, - atype_name *pwhich) +eoshift3_`'atype_kind (gfc_array_char *ret, gfc_array_char *array, + atype *h, const gfc_array_char *bound, + atype_name *pwhich) { /* r.* indicates the return array. */ index_type rstride[GFC_MAX_DIMENSIONS - 1]; |