summaryrefslogtreecommitdiff
path: root/libgfortran/generated/shape_i16.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/shape_i16.c')
-rw-r--r--libgfortran/generated/shape_i16.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/generated/shape_i16.c b/libgfortran/generated/shape_i16.c
index c42aca9d63d..496f03dee7f 100644
--- a/libgfortran/generated/shape_i16.c
+++ b/libgfortran/generated/shape_i16.c
@@ -49,7 +49,7 @@ shape_16 (gfc_array_i16 * const restrict ret,
{
GFC_DIMENSION_SET(ret->dim[0], 0, rank - 1, 1);
ret->offset = 0;
- ret->base_addr = internal_malloc_size (sizeof (GFC_INTEGER_16) * rank);
+ ret->base_addr = xmalloc (sizeof (GFC_INTEGER_16) * rank);
}
stride = GFC_DESCRIPTOR_STRIDE(ret,0);