Issue 203500
Summary [flang] Regression with passing PDT to statement function
Labels regression, flang:semantics
Assignees
Reporter eugeneepshteyn
    After https://github.com/llvm/llvm-project/pull/198610 the following code started to fail:
```
implicit none
type t(k)
  integer, kind :: k = 1
end type

type(t) :: x
integer :: f

f(x) = 0
print *, f(x)
end
```
Compiling:
```
$ flang -c pdt-statement-function-repro.f90 
error: Semantic errors in pdt-statement-function-repro.f90
pdt-statement-function-repro.f90:10:12: error: Parameterized derived type actual argument requires an explicit interface
  print *, f(x)
             ^
```
This should succeed.

Commit used to build flang: a0bad855ccb86c0ace7be1eb05e51895d61afecc
_______________________________________________
llvm-bugs mailing list
[email protected]
https://lists.llvm.org/cgi-bin/mailman/listinfo/llvm-bugs

Reply via email to