From: fxcoudert Date: Fri, 11 Jun 2010 19:36:40 +0000 (+0000) Subject: * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Fix comment. X-Git-Tag: upstream/4.9.2~28804 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=7f9b4a7a83a668e97ba4ad4cad2c3a10d4010916;p=platform%2Fupstream%2Flinaro-gcc.git * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Fix comment. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@160629 138bc75d-0d04-0410-961f-82ee72b054a4 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 19d0c6d..2e27433 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,9 @@ 2010-06-11 Francois-Xavier Coudert + * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Fix comment. + +2010-06-11 Francois-Xavier Coudert + * mathbuiltins.def: Add builtins that do not directly correspond to a Fortran intrinsic, with new macro OTHER_BUILTIN. * f95-lang.c (gfc_init_builtin_functions): Define OTHER_BUILTIN. diff --git a/gcc/fortran/trans-intrinsic.c b/gcc/fortran/trans-intrinsic.c index 8418d2b..10e0dec 100644 --- a/gcc/fortran/trans-intrinsic.c +++ b/gcc/fortran/trans-intrinsic.c @@ -583,7 +583,7 @@ gfc_build_intrinsic_lib_fndecls (void) if (m->complex_long_double_built_in != END_BUILTINS) m->complex10_decl = built_in_decls[m->complex_long_double_built_in]; - /* For now, we assume that if real(kind=10) exists, it is long double. + /* For now, we assume that if real(kind=16) exists, it is long double. Later, we will deal with __float128 and break this assumption. */ if (m->long_double_built_in != END_BUILTINS) m->real16_decl = built_in_decls[m->long_double_built_in];