summaryrefslogtreecommitdiffstats
path: root/libgfortran/generated/pack_i2.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/pack_i2.c')
-rw-r--r--libgfortran/generated/pack_i2.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/generated/pack_i2.c b/libgfortran/generated/pack_i2.c
index 0481720d4bd..de329abf11a 100644
--- a/libgfortran/generated/pack_i2.c
+++ b/libgfortran/generated/pack_i2.c
@@ -167,8 +167,8 @@ pack_i2 (gfc_array_i2 *ret, const gfc_array_i2 *array,
ret->offset = 0;
- /* xmalloc allocates a single byte for zero size. */
- ret->base_addr = xmalloc (sizeof (GFC_INTEGER_2) * total);
+ /* xmallocarray allocates a single byte for zero size. */
+ ret->base_addr = xmallocarray (total, sizeof (GFC_INTEGER_2));
if (total == 0)
return;
OpenPOWER on IntegriCloud