2 ! { dg-options "-fconvert=big-endian" }
5 open (10,form="unformatted",convert="little_endian")
6 inquire (10, convert=ch)
7 if (ch .ne. "LITTLE_ENDIAN") call abort
8 close (10, status="delete")
10 open(11,form="unformatted")
11 inquire (11, convert=ch)
12 if (ch .ne. "BIG_ENDIAN") call abort
13 close (11, status="delete")