gcc/testsuite/gfortran.dg/inquire_iolength.f90

   1 ! { dg-do compile }
   2 ! { dg-options "-std=f95" }
   3 ! PR30014 IOLENGTH does not handle KIND=8.  This patch checks the constraints.
   4 ! Submitted by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
   5 ! F95 Standard 9.6, R923
   6 integer (kind=4) small, x
   7 integer (kind=8) large
   8 inquire (iolength=small) x
   9 inquire (iolength=large) x ! { dg-error "requires default INTEGER" }
  10 end