nullify_1.f   [plain text]

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