git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

gimple-simulate: Correction terminaison chaînes de caractères

This commit is contained in:
Mikael Morin 2025-10-09 13:02:40 +02:00
parent 364d903a19
commit 39957dd73f
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/gimple-simulate.cc
View File

@ -2179,7 +2179,11 @@ simul_scope::evaluate (tree expr) const
const char *str = TREE_STRING_POINTER (expr);
for (int i = 0; i < len; ++i)
set_cst_array_elem_at (result, elt_type, i, str[i]);
set_cst_array_elem_at (result, elt_type, len, 0);
/* Fortran strings are not 0-terminated.
Decide on the 0-termination here depending on the type size. */
if (tree_fits_shwi_p (TYPE_SIZE_UNIT (expr_type))
&& tree_to_shwi (TYPE_SIZE_UNIT (expr_type)) > len)
set_cst_array_elem_at (result, elt_type, len, 0);
return result;
}