diff options
author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-04-22 15:33:01 +0000 |
---|---|---|
committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-04-22 15:33:01 +0000 |
commit | 1d9ee8a89ae88befe5572a65b997cd84241c196f (patch) | |
tree | 646e5ae6929d675514204ffba97ecc64f6157a31 /libgfortran/generated/unpack_c16.c | |
parent | 0972cc307e81708c54bd5b89c91fe99a84c65d73 (diff) | |
parent | 3c64f1347227c8aceae1822bc66659d861596fc4 (diff) | |
download | gcc-1d9ee8a89ae88befe5572a65b997cd84241c196f.tar.gz |
2012-04-22 Tobias Burnus <burnus@net-b.de>
* Merged Revs. 185177 through 186673 from the trunk.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/fortran-dev@186674 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/generated/unpack_c16.c')
-rw-r--r-- | libgfortran/generated/unpack_c16.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/generated/unpack_c16.c b/libgfortran/generated/unpack_c16.c index 9545b52fe0f..8d2c7df0708 100644 --- a/libgfortran/generated/unpack_c16.c +++ b/libgfortran/generated/unpack_c16.c @@ -100,7 +100,7 @@ unpack0_c16 (gfc_array_c16 *ret, const gfc_array_c16 *vector, rs *= extent[n]; } ret->offset = 0; - ret->base_addr = internal_malloc_size (rs * sizeof (GFC_COMPLEX_16)); + ret->base_addr = xmalloc (rs * sizeof (GFC_COMPLEX_16)); } else { @@ -246,7 +246,7 @@ unpack1_c16 (gfc_array_c16 *ret, const gfc_array_c16 *vector, rs *= extent[n]; } ret->offset = 0; - ret->base_addr = internal_malloc_size (rs * sizeof (GFC_COMPLEX_16)); + ret->base_addr = xmalloc (rs * sizeof (GFC_COMPLEX_16)); } else { |