Remove old autovect-branch by moving to "dead" directory.
[official-gcc.git] / old-autovect-branch / gcc / testsuite / gfortran.dg / nullify_1.f
blobabf68c969ba91c462c595df136917eff4f084a8b
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