ALLOCATE with assumed length parameters

pgfortran 17.10 does not understand the ALLOCATE statement when assumed length parameters appear in the type spec. Consider the following subroutine which results in an ICE

subroutine s(x)
 character(*), allocatable :: x(:)
 allocate(character(*) :: x(1))
end subroutine

and the following program

type t(n)
  integer, len :: n
end type


  subroutine s(x)
    type(t(*)), allocatable :: x
    allocate(t(*) :: x)
  end subroutine


This program is rejected with the message

PGF90-S-0034-Syntax error at or near )

This has been logged as TPR 25125.