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

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

! { dg-do compile }
! { dg-options "-std=f2018" }

program selected
  implicit none

  logical(selected_logical_kind(1)) :: l ! { dg-error "has no IMPLICIT type" }
  print *, selected_logical_kind(1) ! { dg-error "has no IMPLICIT type" }
end program