[Bug fortran/38065] private/public confusion with a contained function

[jv244 at cam dot ac dot uk]

------- Comment #8 from jv244 at cam dot ac dot uk  2008-11-11 14:14 -------
(In reply to comment #7)
>   As best I can see, your reduction of the problem is not correct; in it
> subroutine S1 should be private, not public.

I don't think so. See your code, S1 ~ GeomMTF, which is public. The problem is
the contained function F1 (your CreateLine), which incorrectly gets a 'public'
attribute. Note that the same, incorrect error message is displayed for this
testcase.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38065