------- Comment #7 from clerman at fuse dot net  2008-11-11 13:46 -------
Subject: Re:  private/public confusion with a contained
 function

Hello,

  As best I can see, your reduction of the problem is not correct; in it
subroutine S1 should be private, not public.

Yours truly,

Norm Clerman

---- jv244 at cam dot ac dot uk <[EMAIL PROTECTED]> wrote: 
> 
> 
> ------- Comment #6 from jv244 at cam dot ac dot uk  2008-11-11 13:28 -------
> reduced:
> 
> MODULE M1
>   IMPLICIT NONE
>   PRIVATE
>   TYPE T1
>    INTEGER :: I1
>   END TYPE T1
>   PUBLIC :: S1
> CONTAINS
>   SUBROUTINE S1
>   CONTAINS
>    TYPE(T1) FUNCTION F1()
>    END FUNCTION F1
>   END SUBROUTINE S1
> END MODULE M1
> 
> 
> -- 
> 
> jv244 at cam dot ac dot uk changed:
> 
>            What    |Removed                     |Added
> ----------------------------------------------------------------------------
> OtherBugsDependingO|                            |32834
>               nThis|                            |
>              Status|UNCONFIRMED                 |NEW
>      Ever Confirmed|0                           |1
>            Keywords|                            |rejects-valid
>       Known to fail|                            |4.4.0
>    Last reconfirmed|0000-00-00 00:00:00         |2008-11-11 13:28:28
>                date|                            |
>             Summary|bug5                        |private/public confusion
>                    |                            |with a contained function
> 
> 
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38065
> 
> ------- You are receiving this mail because: -------
> You reported the bug, or are watching the reporter.


-- 


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

Reply via email to