diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-29 09:30:50 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-29 09:30:50 +0000 |
commit | 8c7be932d4c52e939f3cbc5d234c28e9c52f9371 (patch) | |
tree | cee46ce3c49ae7d35611696938d3ec097d9852cb /libgfortran/generated/unpack_i1.c | |
parent | 2a4ecd19dcccde445ee059728ccef3520ed772e4 (diff) | |
download | gcc-8c7be932d4c52e939f3cbc5d234c28e9c52f9371.tar.gz |
2012-03-29 Basile Starynkevitch <basile@starynkevitch.net>
MELT branch merged with trunk rev 185951 using svnmerge
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@185952 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/generated/unpack_i1.c')
-rw-r--r-- | libgfortran/generated/unpack_i1.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/generated/unpack_i1.c b/libgfortran/generated/unpack_i1.c index 517474ef86d..0d5ec8ef292 100644 --- a/libgfortran/generated/unpack_i1.c +++ b/libgfortran/generated/unpack_i1.c @@ -99,7 +99,7 @@ unpack0_i1 (gfc_array_i1 *ret, const gfc_array_i1 *vector, rs *= extent[n]; } ret->offset = 0; - ret->base_addr = internal_malloc_size (rs * sizeof (GFC_INTEGER_1)); + ret->base_addr = xmalloc (rs * sizeof (GFC_INTEGER_1)); } else { @@ -244,7 +244,7 @@ unpack1_i1 (gfc_array_i1 *ret, const gfc_array_i1 *vector, rs *= extent[n]; } ret->offset = 0; - ret->base_addr = internal_malloc_size (rs * sizeof (GFC_INTEGER_1)); + ret->base_addr = xmalloc (rs * sizeof (GFC_INTEGER_1)); } else { |