mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-03-26 21:51:12 +08:00
Fix comment typo in previous checkin.
From-SVN: r98620
This commit is contained in:
parent
855a145c55
commit
beceb652c9
@ -1,7 +1,7 @@
|
||||
2005-04-23 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
|
||||
|
||||
* trans-const.c (gfc_conv_mpfr_to_tree): Use hexadecimal string as
|
||||
intermediate representation.
|
||||
intermediate representation. Fix typo in comment.
|
||||
|
||||
2005-04-21 Steven G. Kargl <kargls@comcast.net>
|
||||
|
||||
|
@ -234,7 +234,7 @@ gfc_conv_mpfr_to_tree (mpfr_t f, int kind)
|
||||
p = mpfr_get_str (NULL, &exp, 16, gfc_real_kinds[n].digits / 4 + 1,
|
||||
f, GFC_RND_MODE);
|
||||
|
||||
/* REAL_VALUE_ATOF expects the exponent for mantissae * 2**exp,
|
||||
/* REAL_VALUE_ATOF expects the exponent for mantissa * 2**exp,
|
||||
mpfr_get_str returns the exponent for mantissa * 16**exp, adjust
|
||||
for that. */
|
||||
exp *= 4;
|
||||
|
Loading…
x
Reference in New Issue
Block a user