[Bug fortran/18923] segfault after subroutine name confusion

[fxcoudert at gcc dot gnu dot org]

------- Additional Comments From fxcoudert at gcc dot gnu dot org  2005-05-22 19:26 -------
There is no segfault any more:

$ gfc pr18923.f90
 In file pr18923.f90:3

  subroutine foo(i)
               1
Error: PROGRAM attribute conflicts with PROCEDURE attribute at (1)
 In file pr18923.f90:4

    integer :: i
               1
Error: Unexpected data declaration statement in CONTAINS section at (1)
 In file pr18923.f90:5

    character(len=selected_int_kind(i)) :: c
                                           1
Error: Unexpected data declaration statement in CONTAINS section at (1)
 In file pr18923.f90:6

  end subroutine bar
    1
Error: Expecting END PROGRAM statement at (1)
 In file pr18923.f90:7

end program foo
              1
 Internal Error at (1):
 gfc_get_default_type(): Bad symbol

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
   Last reconfirmed|2004-12-14 22:35:13         |2005-05-22 19:26:20
               date|                            |


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