[Bug fortran/46588] Segfault on automatic function

[oleg.steblev at gmail dot com]

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

--- Comment #1 from Oleh Steblev <oleg.steblev at gmail dot com> 2010-11-21 19:13:43 UTC ---
This chunk causes an error. Although PVF 10.8 passes this function.
    function aufun()
    character(len = *) aufun
    character(len = trim(aufun)) t 
    end