diff options
Diffstat (limited to 'gcc/real.c')
-rw-r--r-- | gcc/real.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/real.c b/gcc/real.c index 3ebf8f32e7a..435d0b5d3fa 100644 --- a/gcc/real.c +++ b/gcc/real.c @@ -4988,7 +4988,15 @@ asctoeg (ss, y, oprec) /* Exponent interpretation */ expnt: + /* 0.0eXXX is zero, regardless of XXX. Check for the 0.0. */ + for (k = 0; k < NI; k++) + { + if (yy[k] != 0) + goto read_expnt; + } + goto aexit; +read_expnt: esign = 1; exp = 0; ++s; |