https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66724
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@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'
