X-Git-Url: http://review.tizen.org/git/?a=blobdiff_plain;f=libgfortran%2Fruntime%2Fconvert_char.c;h=e30a2f634434e3aa595ebad0ea5884ba8596bb36;hb=4d8cd3a26294ce35abb17668eac2b6c38dd23bd0;hp=540c2bfdb652065fa76c45a8496f0df896040979;hpb=c944d49b3bd3667c65c299afd3b1d756084203f4;p=platform%2Fupstream%2Fgcc48.git diff --git a/libgfortran/runtime/convert_char.c b/libgfortran/runtime/convert_char.c index 540c2bf..e30a2f6 100644 --- a/libgfortran/runtime/convert_char.c +++ b/libgfortran/runtime/convert_char.c @@ -1,5 +1,5 @@ /* Runtime conversion of strings from one character kind to another. - Copyright 2008, 2009 Free Software Foundation, Inc. + Copyright (C) 2008-2013 Free Software Foundation, Inc. This file is part of the GNU Fortran runtime library (libgfortran). @@ -44,7 +44,7 @@ convert_char1_to_char4 (gfc_char4_t **dst, gfc_charlen_type len, gfc_charlen_type i, l; l = len > 0 ? len : 0; - *dst = get_mem ((l + 1) * sizeof (gfc_char4_t)); + *dst = xmalloc ((l + 1) * sizeof (gfc_char4_t)); for (i = 0; i < l; i++) (*dst)[i] = src[i]; @@ -60,7 +60,7 @@ convert_char4_to_char1 (unsigned char **dst, gfc_charlen_type len, gfc_charlen_type i, l; l = len > 0 ? len : 0; - *dst = get_mem ((l + 1) * sizeof (unsigned char)); + *dst = xmalloc ((l + 1) * sizeof (unsigned char)); for (i = 0; i < l; i++) (*dst)[i] = src[i];