https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69910
epagone at email dot it changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |epagone at email dot it
--- Comment #4 from epagone at email dot it ---
A workaround is substituting this excerpt
case ('scratch')
open(newunit=funit, status=fstatus, access='sequential', &
form='formatted', iostat=istat)
with the following
case ('scratch')
open(newunit=funit, status='scratch', access='sequential', &
form='formatted', iostat=istat)
