6 open(unit
=1,access
= 999) ! { dg-error "ACCESS requires" }
7 open(unit
=1,action
= 999) ! { dg-error "ACTION requires" }
8 open(unit
=1,asynchronous
= 999) ! { dg-error "ASYNCHRONOUS requires" }
9 open(unit
=1,blank
= 999) ! { dg-error "BLANK requires" }
10 open(unit
=1,decimal
= 999) ! { dg-error "DECIMAL requires" }
11 open(unit
=1,delim
= 999) ! { dg-error "DELIM requires" }
12 open(unit
=1,encoding
= 999) ! { dg-error "ENCODING requires" }
13 open(unit
=1,form
= 999) ! { dg-error "FORM requires" }
14 open(unit
=1,pad
= 999) ! { dg-error "PAD requires" }
15 open(unit
=1,position
= 999) ! { dg-error "POSITION requires" }
16 open(unit
=1,round
= 999) ! { dg-error "ROUND requires" }
17 open(unit
=1,sign
= 999) ! { dg-error "SIGN requires" }
18 open(unit
=1,status
= 999) ! { dg-error "STATUS requires" }
20 close(unit
=1, status
=999) ! { dg-error "STATUS requires" }
22 write (unit
=1, asynchronous
=257) ! { dg-error "ASYNCHRONOUS requires" }
23 write (unit
=1, delim
=257) ! { dg-error "DELIM requires" }
24 write (unit
=1, decimal
=257) ! { dg-error "DECIMAL requires" }
25 write (unit
=1, round
=257) ! { dg-error "ROUND requires" }
26 write (unit
=1, sign
=257) ! { dg-error "SIGN requires" }
28 write (unit
=1, blank
=257) ! { dg-error "BLANK requires" }
29 write (unit
=1, pad
=257) ! { dg-error "PAD requires" }