summaryrefslogtreecommitdiff
path: root/libgfortran/generated/minloc0_8_i16.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/minloc0_8_i16.c')
-rw-r--r--libgfortran/generated/minloc0_8_i16.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libgfortran/generated/minloc0_8_i16.c b/libgfortran/generated/minloc0_8_i16.c
index d494c677bd6..945ec4c9c8f 100644
--- a/libgfortran/generated/minloc0_8_i16.c
+++ b/libgfortran/generated/minloc0_8_i16.c
@@ -59,7 +59,7 @@ minloc0_8_i16 (gfc_array_i8 * const restrict retarray,
retarray->elem_len = retarray->elem_len;
retarray->type = retarray->type;
retarray->offset = 0;
- retarray->base_addr = xmalloc (sizeof (GFC_INTEGER_8) * rank);
+ retarray->base_addr = xmallocarray (rank, sizeof (GFC_INTEGER_8));
}
else
{
@@ -201,7 +201,7 @@ mminloc0_8_i16 (gfc_array_i8 * const restrict retarray,
retarray->elem_len = retarray->elem_len;
retarray->type = retarray->type;
retarray->offset = 0;
- retarray->base_addr = xmalloc (sizeof (GFC_INTEGER_8) * rank);
+ retarray->base_addr = xmallocarray (rank, sizeof (GFC_INTEGER_8));
}
else
{
@@ -368,7 +368,7 @@ sminloc0_8_i16 (gfc_array_i8 * const restrict retarray,
{
GFC_DIMENSION_SET (retarray->dim[0], 0, rank, sizeof (GFC_INTEGER_8));
retarray->offset = 0;
- retarray->base_addr = xmalloc (sizeof (GFC_INTEGER_8) * rank);
+ retarray->base_addr = xmallocarray (rank, sizeof (GFC_INTEGER_8));
}
else if (unlikely (compile_options.bounds_check))
{