[Bug fortran/41370] Function return-type declaration with specification expression rejected

[dominiq at lps dot ens.fr]

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

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2013-06-16
     Ever confirmed|0                           |1

--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
Since gfortran 4.8, the errors are now

pr41370_1.f90:6.19:

  character(len=mt%i) function foo(mt)
                   1
Error: Symbol 'mt' at (1) has no IMPLICIT type
pr41370_1.f90:7.29:

    type(t), intent(in) :: mt
                             1
Error: Unexpected data declaration statement in CONTAINS section at (1)
pr41370_1.f90:8.5:

  end function foo
     1
Error: Expecting END MODULE statement at (1)

for the test in comment #0 and

pr41370_1.f90:6.19:

  character(len=mt%i) function foo(mt)
                   1
Error: Symbol 'mt' at (1) has no IMPLICIT type
pr41370_1.f90:7.29:

    type(t), intent(in) :: mt
                             1
Error: Unexpected data declaration statement in CONTAINS section at (1)
pr41370_1.f90:8.5:

  end function foo
     1
Error: Expecting END MODULE statement at (1)

for the test in comment #1.