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



--- Comment #3 from Vladimir Fuka <vladimir.fuka at gmail dot com> 2013-04-16 
17:40:04 UTC ---

Thanks, I didn't realize they might be connected. I even forgotten I have

this bug opened when I asked.



  Vladimir

Dne 16.4.2013 19:17 "burnus at gcc dot gnu.org" <gcc-bugzi...@gcc.gnu.org>

napsal(a):



>

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

>

> Tobias Burnus <burnus at gcc dot gnu.org> changed:

>

>            What    |Removed                     |Added

>

> ----------------------------------------------------------------------------

>            Keywords|                            |rejects-valid

>              Status|UNCONFIRMED                 |NEW

>    Last reconfirmed|                            |2013-04-16

>                  CC|                            |burnus at gcc dot gnu.org

>      Ever Confirmed|0                           |1

>

> --- Comment #2 from Tobias Burnus <burnus at gcc dot gnu.org> 2013-04-16

> 17:17:52 UTC ---

> Related test case by the bug reporterm

>

> https://groups.google.com/forum/?fromgroups=#!topic/comp.lang.fortran/UvBX1kfuFqs

>

>

> This time rejecting the code instead of ICEing:

>

>    print *,x%i

>              1

> Error: Symbol 'x' at (1) has no IMPLICIT type

>

>

>

> program p

>   type t

>     integer :: i = 0

>   end type

>

>   associate (x=>f())

>     print *,x%i

>   end associate

>

>   contains

>     function f()

>       type(t) f

>       f%i = 5

>     end function

> end program

>

> --

> Configure bugmail: http://gcc.gnu.org/bugzilla/userprefs.cgi?tab=email

> ------- You are receiving this mail because: -------

> You are on the CC list for the bug.

> You reported the bug.

>

Reply via email to