'character *(*) function f' does not parse

[dagit]

Converted from SourceForge issue 3397044, submitted by scottkwarren

When a function is declared with an initial type of 'character_(_)', the parser gives the following error message:
no viable alternative at input 'f'
Such a declaration is legal -- see Fortran 90 Specification (N692) 5.1.1.5 rule R509, list item (3).

If the alternative syntax 'character(len=*)' is used, the function parses correctly.