1! { dg-do run }
2! PR 24945
3! Test reopening file without status specifier or with
4! status='unknown'. The standard says that these two must behave
5! identically, but the actual behavior is processor dependent.
6program open_status_2
7  open(10, file="f", form='unformatted', status='unknown')
8  open(10, file="f", form='unformatted', status='unknown')
9  open(10, file="f", form='unformatted')
10  close(10, status='delete')
11end program open_status_2
12
13