c: Fix up pointer types to may_alias structures [PR114493]

[official-gcc.git] / gcc / testsuite / gfortran.dg / allocatable_length.f90

! { dg-do compile }
! { dg-options "-Werror -Wall" }
module foo
   contains
      subroutine bar 
         character(len=:), allocatable :: s(:)
         call bah(s)
      end subroutine bar
end module foo