summaryrefslogtreecommitdiff
path: root/libgfortran/generated/in_pack_c10.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/in_pack_c10.c')
-rw-r--r--libgfortran/generated/in_pack_c10.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/generated/in_pack_c10.c b/libgfortran/generated/in_pack_c10.c
index 1d6b0db637b..2279690764c 100644
--- a/libgfortran/generated/in_pack_c10.c
+++ b/libgfortran/generated/in_pack_c10.c
@@ -76,7 +76,7 @@ internal_pack_c10 (gfc_array_c10 * source)
return source->base_addr;
/* Allocate storage for the destination. */
- destptr = (GFC_COMPLEX_10 *)internal_malloc_size (ssize * sizeof (GFC_COMPLEX_10));
+ destptr = (GFC_COMPLEX_10 *)xmalloc (ssize * sizeof (GFC_COMPLEX_10));
dest = destptr;
src = source->base_addr;
stride0 = stride[0];