summaryrefslogtreecommitdiffstats
path: root/libgfortran/generated/minloc1_4_r8.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/minloc1_4_r8.c')
-rw-r--r--libgfortran/generated/minloc1_4_r8.c11
1 files changed, 10 insertions, 1 deletions
diff --git a/libgfortran/generated/minloc1_4_r8.c b/libgfortran/generated/minloc1_4_r8.c
index aafb578cc2e..bb59dccd77d 100644
--- a/libgfortran/generated/minloc1_4_r8.c
+++ b/libgfortran/generated/minloc1_4_r8.c
@@ -26,8 +26,12 @@ Boston, MA 02111-1307, USA. */
#include <limits.h>
#include "libgfortran.h"
+
+extern void __minloc1_4_r8 (gfc_array_i4 *, gfc_array_r8 *, index_type *);
+export_proto_np(__minloc1_4_r8);
+
void
-__minloc1_4_r8 (gfc_array_i4 * retarray, gfc_array_r8 *array, index_type *pdim)
+__minloc1_4_r8 (gfc_array_i4 *retarray, gfc_array_r8 *array, index_type *pdim)
{
index_type count[GFC_MAX_DIMENSIONS - 1];
index_type extent[GFC_MAX_DIMENSIONS - 1];
@@ -152,6 +156,11 @@ __minloc1_4_r8 (gfc_array_i4 * retarray, gfc_array_r8 *array, index_type *pdim)
}
}
+
+extern void __mminloc1_4_r8 (gfc_array_i4 *, gfc_array_r8 *, index_type *,
+ gfc_array_l4 *);
+export_proto_np(__mminloc1_4_r8);
+
void
__mminloc1_4_r8 (gfc_array_i4 * retarray, gfc_array_r8 * array, index_type *pdim, gfc_array_l4 * mask)
{
OpenPOWER on IntegriCloud