diff options
author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2025-09-02 15:58:26 -0700 |
---|---|---|
committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2025-09-02 15:58:26 -0700 |
commit | 071b4126c613881f4cb25b4e5c39032964827f88 (patch) | |
tree | 7ed805786566918630d1d617b1ed8f7310f5fd8e /gcc/real.cc | |
parent | 845d23f3ea08ba873197c275a8857eee7edad996 (diff) | |
parent | caa1c2f42691d68af4d894a5c3e700ecd2dba080 (diff) | |
download | gcc-devel/gfortran-test.zip gcc-devel/gfortran-test.tar.gz gcc-devel/gfortran-test.tar.bz2 |
Merge branch 'master' into gfortran-testdevel/gfortran-test
Diffstat (limited to 'gcc/real.cc')
-rw-r--r-- | gcc/real.cc | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/real.cc b/gcc/real.cc index 1f987d4..43d2524 100644 --- a/gcc/real.cc +++ b/gcc/real.cc @@ -1629,6 +1629,11 @@ real_to_decimal_for_mode (char *str, const REAL_VALUE_TYPE *r_orig, strcpy (str, (r.sign ? "-0.0" : "0.0")); return; case rvc_normal: + /* When r_orig is a positive value that converts to all nines and is + rounded up to 1.0, str[0] is harmlessly accessed before being set to + '1'. That read access triggers a valgrind warning. Setting str[0] + to any value quiets the warning. */ + str[0] = ' '; break; case rvc_inf: strcpy (str, (r.sign ? "-Inf" : "+Inf")); |