As I don't have priority support for oneAPI (only for the 'traditional' compiler series), I post this here, in hope that someone from the Intel team picks it up. Apparently, Intel oneAPI throws an error on standard-conformant code, namely when defining a UDT with private components in a module, and then using its structure constructor in a submodule of that module, Intel oneAPI (both 21 and 22) complain:
bla.f90(30): error #6053: Structure constructor may not have components with the PRIVATE attribute [42]
t = t1(42)
-----------^
However, the submodule should have the same scoping unit as its (parent) module, so the structure constructor should be usable in the submodule. Here is the reproducer:
module foo
implicit none
private
type t1
private
integer :: i
end type t1
interface
module function xxx ()
integer :: xxx
end function
end interface
end module foo
submodule (foo) foo_s
implicit none
contains
module function xxx ()
integer :: xxx
xxx = 17
end function
pure function func () result (t)
type(t1) :: t
t = t1(42)
end function func
end submodule foo_s
