! { dg-do compile } ! PR fortran/31472 ! Access specifications: Valid Fortran 2003 code module mod implicit none private integer, public :: i integer, private :: z integer :: j, x private :: j public :: x type, public :: bar PRIVATE integer, public :: y ! Fortran 2003 integer, private :: z ! Fortran 2003 end type end module ! { dg-final { cleanup-modules "mod" } }