diff options
Diffstat (limited to 'libgfortran/m4/pack.m4')
| -rw-r--r-- | libgfortran/m4/pack.m4 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/m4/pack.m4 b/libgfortran/m4/pack.m4 index e88e84e0adc..bc7f3b92f75 100644 --- a/libgfortran/m4/pack.m4 +++ b/libgfortran/m4/pack.m4 @@ -169,8 +169,8 @@ pack_'rtype_code` ('rtype` *ret, const 'rtype` *array, ret->offset = 0; - /* internal_malloc_size allocates a single byte for zero size. */ - ret->base_addr = internal_malloc_size (sizeof ('rtype_name`) * total); + /* xmalloc allocates a single byte for zero size. */ + ret->base_addr = xmalloc (sizeof ('rtype_name`) * total); if (total == 0) return; |