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