1!
2! ALLOCATABLE COMPONENTS:
3! - OpenMP 5: Permitted (and automatically recursively mapped)
4!   -> Not yet supported.
5! - OpenMP 4.5: Not permitted.
6!
7implicit none (type, external)
8type sct
9  integer, allocatable :: c
10end type
11type(sct) var
12
13!$omp target enter data map(to:var)  ! { dg-error "allocatable components is not permitted in map clause" }
14end
15