! { dg-do compile } ! ! TS 29113 ! 5.3 ALLOCATABLE, OPTIONAL, and POINTER attributes ! The ALLOCATABLE, OPTIONAL, and POINTER attributes may be specified ! for a dummy argument in a procedure interface that has the BIND ! attribute. subroutine test (a, b, c) integer, allocatable :: a integer, optional :: b integer, pointer :: c interface subroutine ctest (aa, bb, cc) bind (c) integer, allocatable :: aa integer, optional :: bb integer, pointer :: cc end subroutine end interface call ctest (a, b, c) end subroutine