1! { dg-do compile }
2!
3! Test the fix for PR82589
4!
5! Contributed by G Steinmetz  <gscfq@t-online.de>
6!
7module m
8   type t(a)
9      integer, KIND, private :: a        ! { dg-error "attribute conflicts with" }
10      integer, KIND, allocatable :: a    ! { dg-error "attribute conflicts with" }
11      integer, KIND, POINTER :: a        ! { dg-error "attribute conflicts with" }
12      integer, KIND, dimension(2) :: a   ! { dg-error "attribute conflicts with" }
13      integer, len, private :: a         ! { dg-error "attribute conflicts with" }
14      integer, len, allocatable :: a     ! { dg-error "attribute conflicts with" }
15      integer, len, POINTER :: a         ! { dg-error "attribute conflicts with" }
16      integer, len, dimension(2) :: a    ! { dg-error "attribute conflicts with" }
17      integer, kind :: a
18   end type
19end
20