| Issue |
161538
|
| Summary |
[flang] Inquiry on the KIND of a kind parameter of derived type failed
|
| Labels |
flang:frontend
|
| Assignees |
|
| Reporter |
DanielCChen
|
Consider the following code:
```
type :: dt(k)
integer(8), kind :: k
end type
type(dt(4)) :: d1
print*, d1%k%kind
end
```
Flang failed to compile the code above with
```
t.f:5:12: error: 'k' is not an object and may not be used as the base of a component reference or type parameter inquiry
print*, d1%k%kind
^
```
All ifort, gfortran and XLF compile and run the code successfully.
_______________________________________________
llvm-bugs mailing list
[email protected]
https://lists.llvm.org/cgi-bin/mailman/listinfo/llvm-bugs