[Bug fortran/37597] New: internal procedure fails to access host-associated module procedure

[Bug fortran/37597] New: internal procedure fails to access host-associated module procedure

[burnus at gcc dot gnu dot org]

http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/150847ad37d33cdb

The following is rejected with:
  Error: Symbol 'other_sub' at (1) has no IMPLICIT type

If one moves other_sub up in the module, it works.

 module foo
   implicit none
contains
   subroutine main_sub ()
     call internal_sub()
   contains
     subroutine internal_sub()
       call QAG(other_sub)
     end subroutine internal_sub
   end subroutine main_sub
   subroutine other_sub ()
   end subroutine other_sub
end module foo


-- 
           Summary: internal procedure fails to access host-associated
                    module procedure
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org
OtherBugsDependingO 32834
             nThis:


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

[Bug fortran/37597] internal procedure fails to access host-associated module procedure

[pault at gcc dot gnu dot org]

-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2008-09-21 19:38:06
               date|                            |


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

[Bug fortran/37597] internal procedure fails to access host-associated module procedure

[pault at gcc dot gnu dot org]

------- Comment #1 from pault at gcc dot gnu dot org  2008-11-04 21:12 -------
An 'obvious' fix is on the way.

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |pault at gcc dot gnu dot org
                   |dot org                     |
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2008-09-21 19:38:06         |2008-11-04 21:12:57
               date|                            |


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

[Bug fortran/37597] internal procedure fails to access host-associated module procedure

[pault at gcc dot gnu dot org]

------- Comment #2 from pault at gcc dot gnu dot org  2008-11-04 21:19 -------
Subject: Bug 37597

Author: pault
Date: Tue Nov  4 21:17:53 2008
New Revision: 141588

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=141588
Log:
2008-11-04  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/37597
        * parse.c (gfc_fixup_sibling_symbols ): Fixup contained, even
        when symbol not found.

2008-11-04  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/37597
        * gfortran.dg/host_assoc_call_5.f90: New test.



Added:
    trunk/gcc/testsuite/gfortran.dg/host_assoc_call_5.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/parse.c
    trunk/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/37597] internal procedure fails to access host-associated module procedure

[pault at gcc dot gnu dot org]

------- Comment #4 from pault at gcc dot gnu dot org  2008-11-08 14:19 -------
Subject: Bug 37597

Author: pault
Date: Sat Nov  8 14:17:35 2008
New Revision: 141708

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=141708
Log:
2008-11-08  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/37597
        * parse.c (gfc_fixup_sibling_symbols ): Fixup contained, even
        when symbol not found.

2008-11-08  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/37597
        * gfortran.dg/host_assoc_call_5.f90: New test.



Added:
    branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/host_assoc_call_5.f90
Modified:
    branches/gcc-4_3-branch/gcc/fortran/ChangeLog
    branches/gcc-4_3-branch/gcc/fortran/parse.c
    branches/gcc-4_3-branch/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/37597] internal procedure fails to access host-associated module procedure

[pault at gcc dot gnu dot org]

------- Comment #3 from pault at gcc dot gnu dot org  2008-11-08 14:18 -------
Fixed on trunk and 4.3

Thanks for the report

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED


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