summaryrefslogtreecommitdiff
path: root/libgfortran/generated/transpose_c10.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/transpose_c10.c')
-rw-r--r--libgfortran/generated/transpose_c10.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libgfortran/generated/transpose_c10.c b/libgfortran/generated/transpose_c10.c
index 2d9c84c9893..e746cef0e96 100644
--- a/libgfortran/generated/transpose_c10.c
+++ b/libgfortran/generated/transpose_c10.c
@@ -60,7 +60,8 @@ transpose_c10 (gfc_array_c10 * const restrict ret,
GFC_DIMENSION_SET(ret->dim[1], 0, GFC_DESCRIPTOR_EXTENT(source,0),
GFC_DESCRIPTOR_EXTENT(source, 1)*sizeof (GFC_COMPLEX_10));
- ret->base_addr = xmalloc (sizeof (GFC_COMPLEX_10) * size0 ((array_t *) ret));
+ ret->base_addr = xmallocarray (size0 ((array_t *) ret),
+ sizeof (GFC_COMPLEX_10));
ret->offset = 0;
} else if (unlikely (compile_options.bounds_check))
{