Fix translation issue with character length * errors (PR fortran/79860)

gcc/fortran/ChangeLog:
	PR fortran/79860
	* resolve.c (resolve_contained_fntype): Make error messages more
	amenable to translation.

From-SVN: r246170
This commit is contained in:
David Malcolm 2017-03-15 18:05:06 +00:00 committed by David Malcolm
parent 395a1e9b5c
commit 7fb22ebe01
2 changed files with 11 additions and 4 deletions

View File

@ -1,3 +1,9 @@
2017-03-15 David Malcolm <dmalcolm@redhat.com>
PR fortran/79860
* resolve.c (resolve_contained_fntype): Make error messages more
amenable to translation.
2017-03-06 Richard Biener <rguenther@suse.de>
PR fortran/79894

View File

@ -615,10 +615,11 @@ resolve_contained_fntype (gfc_symbol *sym, gfc_namespace *ns)
gcc_assert (ns->parent && ns->parent->proc_name);
module_proc = (ns->parent->proc_name->attr.flavor == FL_MODULE);
gfc_error ("Character-valued %s %qs at %L must not be"
" assumed length",
module_proc ? _("module procedure")
: _("internal function"),
gfc_error (module_proc
? G_("Character-valued module procedure %qs at %L"
" must not be assumed length")
: G_("Character-valued internal function %qs at %L"
" must not be assumed length"),
sym->name, &sym->declared_at);
}
}