gcc/testsuite/gfortran.dg/finalize_9.f90

   1 ! { dg-do compile }
   2 !
   3 ! PR 43244: Invalid statement misinterpreted as FINAL declaration
   4 !
   5 ! Contributed by Janus Weil <janus@gcc.gnu.org>
   6
   7 implicit none
   8 type particle
   9   integer :: ID
  10 end type
  11 type(particle), dimension(1,1:3)  :: finalState
  12 finalstate(1,(/1:2/))%ID = (/1,103/)  ! { dg-error "Syntax error in array constructor" }
  13 end