recursive subroutine dows not appear in the list of subroutines 
I use svn 1.5.5 v 617.

here is the code that replicates the bug

module test
ifmplicit none

private
public :: DeleteList
  contains
!> \brief recursive function that deallocates all the nodes starting with root
!> \details
!> \author Alin M Elena
!> \date 14th of January 2006
!> \param root type(names), pointer the starting node
  recursive subroutine DeleteList(root)
    character(len=*), parameter :: myname = 'DeleteList'
    type(names), pointer :: root
    type(names), pointer :: current

    current=>root%next
    if (associated(current)) then
      call DeleteList(current)
    else
      deallocate(root)
    endif 
  end subroutine DeleteList
end module test