[patch, fortran, committed] Fix symbol name for prototypes generated by -fc-prototypes

[Thomas Koenig]

Hello world,

I have just committed the attached patch as obvious and simple.
Before, the C binding label was ignored for generating
function prototypes with the -fc-prototypes option.

2018-01-31  Thomas Koenig  <tkoe...@gcc.gnu.org>

        * dump-parse-tree.c (write_proc): Use sym_name (which may
        be sym->binding_label) instead of sym->name.

@@ -3227,7 +3227,7 @@ write_proc (gfc_symbol *sym)
       fputs (sym_name, dumpfile);
     }
   else
-    write_decl (&(sym->ts), sym->as, sym->name, true, &sym->declared_at);
+    write_decl (&(sym->ts), sym->as, sym_name, true, &sym->declared_at);

   fputs (" (", dumpfile);


Regards

        Thomas