gcc/testsuite/gfortran.dg/byte_4.f90


1
2
3
4
5
6
7
8
9
10

! { dg-do compile }
! { dg-options "-w" }
      bytea          ! { dg-error "Unclassifiable statement" }
      byte b
      byte :: d
      a = 1
      b = 1
      d = 1
      print *, a, b * d
      end