[Bug fortran/125924] New: False positive for [-Wunused-read]

[manfred99 at gmx dot ch via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=125924

            Bug ID: 125924
           Summary: False positive for [-Wunused-read]
           Product: gcc
           Version: 17.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: manfred99 at gmx dot ch
  Target Milestone: ---

cat > unused3.f <<EOF
      program unused3

      character(len=100) buffer,buffer2

      READ(*,'(a)') buffer
      READ(buffer,'(a)') buffer2
      !!print*,TRIM(buffer)
      print*,TRIM(buffer2)

      end
EOF

#> /usr/local/gfortran-17/bin/gfortran -Wall -W unused3.f -o unused3
unused3.f:5:20:

    5 |       READ(*,'(a)') buffer
      |                    1~~~~~~
Warning: Variable 'buffer' read at (1) but never used [-Wunused-read]



May be similar to PR #125801



This is with GCC 17.0.0 20260614 plus patch
https://gcc.gnu.org/g:9861e3f70ee0909a814a0cfeb8cc7166d062cb20