https://gcc.gnu.org/bugzilla/show_bug.cgi?id=123201
Bug ID: 123201
Summary: gfortran.dg/value_9.f90 FAILs
Product: gcc
Version: 16.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: ro at gcc dot gnu.org
Target Milestone: ---
Target: sparc-sun-solaris2.11
Between 20250901 (20cd438f2f49ed4816cba9ecc558ee3377b342ba) and 20250902
(dea668daa2ea8f9d3d8058dac56e60ebe79255c1),
the gfortran.dg/value_9.f90 test began to FAIL on 32-bit Solaris/SPARC:
+FAIL: gfortran.dg/value_9.f90 -O0 execution test
+FAIL: gfortran.dg/value_9.f90 -O1 execution test
+FAIL: gfortran.dg/value_9.f90 -O2 execution test
+FAIL: gfortran.dg/value_9.f90 -O3 -fomit-frame-pointer -funroll-loops
-fpeel-loops -ftracer -finline-functions execution test
+FAIL: gfortran.dg/value_9.f90 -O3 -g execution test
+FAIL: gfortran.dg/value_9.f90 -Os execution test
Running under gdb finds
(gdb) s
p::val (x=..., c=40 '(', err1=45, err2=46, _x=3, _c=1)
at /vol/gcc/src/hg/master/local/gcc/testsuite/gfortran.dg/value_9.f90:74
74 print *, "by value(kind=1): ", c
(gdb) n
by value(kind=1): (
75 if (c /= x) stop err1
(gdb) p c
$1 = 40 '('
(gdb) p x
$2 = 'U'
