Minor patch to had translation marks.
Regression tested. OK for Trunk?
Jerry
2017-03-30 Jerry DeLisle <[email protected]>
PR fortran/38573
* intrinsic.c (gfc_check_intrinsic_standard): Adjust diagnostics.
diff --git a/gcc/fortran/intrinsic.c b/gcc/fortran/intrinsic.c
index 2f60fe8..2e3b250 100644
--- a/gcc/fortran/intrinsic.c
+++ b/gcc/fortran/intrinsic.c
@@ -4575,39 +4575,39 @@ gfc_check_intrinsic_standard (const gfc_intrinsic_sym* isym,
switch (isym->standard)
{
case GFC_STD_F77:
- symstd_msg = "available since Fortran 77";
+ symstd_msg = _("available since Fortran 77");
break;
case GFC_STD_F95_OBS:
- symstd_msg = "obsolescent in Fortran 95";
+ symstd_msg = _("obsolescent in Fortran 95");
break;
case GFC_STD_F95_DEL:
- symstd_msg = "deleted in Fortran 95";
+ symstd_msg = _("deleted in Fortran 95");
break;
case GFC_STD_F95:
- symstd_msg = "new in Fortran 95";
+ symstd_msg = _("new in Fortran 95");
break;
case GFC_STD_F2003:
- symstd_msg = "new in Fortran 2003";
+ symstd_msg = _("new in Fortran 2003");
break;
case GFC_STD_F2008:
- symstd_msg = "new in Fortran 2008";
+ symstd_msg = _("new in Fortran 2008");
break;
case GFC_STD_F2008_TS:
- symstd_msg = "new in TS 29113/TS 18508";
+ symstd_msg = _("new in TS 29113/TS 18508");
break;
case GFC_STD_GNU:
- symstd_msg = "a GNU Fortran extension";
+ symstd_msg = _("a GNU Fortran extension");
break;
case GFC_STD_LEGACY:
- symstd_msg = "for backward compatibility";
+ symstd_msg = _("for backward compatibility");
break;
default:
