[Bug fortran/66724] ICE on input/output statements with wrong specifier data

["gerhard dot steinmetz dot fortran at t-online dot de" <gcc-bugzilla at gcc dot gnu dot org>]

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

--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---
Longer scheme :

   backspace (1, iomsg=#)
   close (1, iomsg=#)
   close (1, status=#)
   endfile (1, iomsg=#)
   flush (1, iomsg=#)
   inquire (1, iomsg=#)
   open (1, access=#)
   open (1, action=#)
   open (1, asynchronous=#)
   open (1, blank=#)
   open (1, delim=#)
   open (1, decimal=#)
   open (1, encoding=#)
   open (1, form=#)
   open (1, iomsg=#)
   open (1, pad=#)
   open (1, position=#)
   open (1, round=#)
   open (1, sign=#)
   open (1, status=#)
   read (1, asynchronous=#)
   read (1, blank=#)
   read (1, delim=#)
   read (1, decimal=#)
   read (1, iomsg=#)
   read (1, pad=#)
   read (1, round=#)
   read (1, sign=#)
   rewind (1, iomsg=#)
   wait (1, iomsg=#)
   write (1, asynchronous=#)
   write (1, blank=#)
   write (1, delim=#)
   write (1, decimal=#)
   write (1, iomsg=#)
   write (1, pad=#)
   write (1, round=#)
   write (1, sign=#)


Replace placeholder # with another string :
1, 1e1, 1d1, .false., '', 'no', null(),
(1), (1., 0.), [1], [''], ...


Of course, not every combination line/# from above gives an ICE.
For example :
    open (1, access='no')
                        1
Error: ACCESS specifier in OPEN statement at (1) has invalid value 'no'