gcc/testsuite/gfortran.dg/nullify_1.f

   1 C { dg-do compile }
   2 C PR 18993
   3 C we didn't match the end of statement following NULLIFY ()
   4 C this lead to weird error messages
   5       subroutine ordern( )
   6       real, pointer :: aux(:,:)
   7 C Nullify pointers
   8       nullify(aux)
   9 C Set default sizes for order N arrays
  10       end subroutine ordern
  11