gcc/testsuite/gfortran.dg/initialization_17.f90

   1 ! { dg-do compile }
   2 !
   3 ! PR fortran/34514
   4 !
   5 ! Initialization and typespec changes.
   6 !
   7 integer :: n = 5, m = 7
   8 parameter (n = 42) ! { dg-error "Initializing already initialized variable" }
   9 dimension :: m(3)  ! { dg-error "after its initialization" }
  10 end