https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78500
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Whereas :
$ cat z2.f90
type(t) function f()
f = 1
end
$ gfortran-7-20161120 -c z2.f90
z2.f90:1:0:
type(t) function f()
Error: The type for function 'f' at (1) is not accessible
z2.f90:2:3:
f = 1
1
Error: Type inaccessible in variable definition context (assignment) at (1)
