Follow-up to PR42072. Consider this simple program:

contains

  subroutine setpointer (p)
    procedure(), pointer :: p
  end subroutine

end


Compiling this with -fdump-tree-original shows:


setpointer (void (*<T62>) (void) * p)
{
  (void) 0;
}

MAIN__ ()
{
  static void setpointer (void (*<T62>) (void));

  (void) 0;
}


As one can see, the static declaration inside MAIN__ differs from the actual
declaration of 'setpointer'.


-- 
           Summary: -fdump-tree-original shows wrong static decl for
                    functions with procptr argument
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: janus at gcc dot gnu dot org


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

Reply via email to