1! { dg-do compile } 2! 3! PR fortran/57141 4! 5! Contributed by Roger Ferrer Ibanez 6! 7MODULE M 8 INTRINSIC :: NULL 9END MODULE M 10 11MODULE M_INTERN 12 USE M 13 IMPLICIT NONE 14 REAL, POINTER :: ARR(:) => NULL() 15END MODULE M_INTERN 16