diff options
Diffstat (limited to 'libgfortran/generated/maxloc1_8_r4.c')
| -rw-r--r-- | libgfortran/generated/maxloc1_8_r4.c | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/libgfortran/generated/maxloc1_8_r4.c b/libgfortran/generated/maxloc1_8_r4.c index 1ab1be85a95..adeac9a35a5 100644 --- a/libgfortran/generated/maxloc1_8_r4.c +++ b/libgfortran/generated/maxloc1_8_r4.c @@ -26,8 +26,12 @@ Boston, MA 02111-1307, USA. */ #include <limits.h> #include "libgfortran.h" + +extern void __maxloc1_8_r4 (gfc_array_i8 *, gfc_array_r4 *, index_type *); +export_proto_np(__maxloc1_8_r4); + void -__maxloc1_8_r4 (gfc_array_i8 * retarray, gfc_array_r4 *array, index_type *pdim) +__maxloc1_8_r4 (gfc_array_i8 *retarray, gfc_array_r4 *array, index_type *pdim) { index_type count[GFC_MAX_DIMENSIONS - 1]; index_type extent[GFC_MAX_DIMENSIONS - 1]; @@ -152,6 +156,11 @@ __maxloc1_8_r4 (gfc_array_i8 * retarray, gfc_array_r4 *array, index_type *pdim) } } + +extern void __mmaxloc1_8_r4 (gfc_array_i8 *, gfc_array_r4 *, index_type *, + gfc_array_l4 *); +export_proto_np(__mmaxloc1_8_r4); + void __mmaxloc1_8_r4 (gfc_array_i8 * retarray, gfc_array_r4 * array, index_type *pdim, gfc_array_l4 * mask) { |
