https://gcc.gnu.org/bugzilla/show_bug.cgi?id=52279

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargl at gcc dot gnu.org

--- Comment #2 from kargl at gcc dot gnu.org ---
(In reply to CVS Commits from comment #1)
> The master branch has been updated by Mark Eggleston
> <markeggles...@gcc.gnu.org>:
> 
> https://gcc.gnu.org/g:0a7183f6d173cbd69025a3deb30d16f91e6392b2
> 
> commit r11-1764-g0a7183f6d173cbd69025a3deb30d16f91e6392b2
> Author: Mark Eggleston <markeggles...@gcc.gnu.org>
> Date:   Tue Jun 2 08:38:01 2020 +0100
> 
>     Fortran  : Fortran translation issues PR52279
>     
>     Mark strings for translation by enclosing in G_() and _().
>     
>     2020-06-24  Mark Eggleston  <markeggles...@gcc.gnu.org>
>     
>     gcc/fortran/
>     
>             PR fortran/52279
>             * arith.c (reduce_binary_aa): Mark for translation the string
>             parameter to gfc_check_conformance with G_().
>             * check.c (gfc_invalid_boz): Mark hint for translation using
>             _().  (gfc_check_achar): Mark for translation the message
>             parameter to gfc_invalid_boz using G_().  (gfc_check_char):
>             Mark for translation the message parameter to gfc_invalid_boz
>             using G_().  (gfc_check_complex): Mark for translation the
>             message parameter to gfc_invalid_boz using G_().
>             (gfc_check_float): Mark for translation the message
>             parameter to gfc_invalid_boz using G_().  (check_rest): Mark
>             for translation the string parameter to gfc_check_conformance
>             with _().  (gfc_check_minloc_maxloc): Mark for translation
>             the string parameter to gfc_check_conformance with _().
>             (gfc_check_findloc): Mark for translation the string parameter
>             to gfc_check_conformance with _().  (check_reduction): Mark
>             for translation the string parameter to gfc_check_conformance
>             with _().  (gfc_check_pack): Mark for translation the string
>             parameter to gfc_check_conformance with _().
>             * decl.c (match_old_style_init): Mark for translation the
>             message parameter to gfc_invalid_boz using G_().
>             * expr.c (gfc_check_assign): Mark for translation the string
>             parameter to gfc_check_conformance with _().
>             * intrinsic.c (check_specific): Mark for translation the string
>             parameter to gfc_check_conformance with _().
>             (gfc_check_intrinsic_standard): Mark symstd_msg strings for
>             translation using G_(). No need to mark symstd_msg for
>             translation in call to gfc_warning or when setting symstd.
>             * io.c (check_open_constraints):  Mark strings for translation
>             using G_() in all calls to warn_or_error.  (match_io_element):
>             Mark for translation the message parameter to gfc_invalid_boz
>             using G_().
>             * primary.c (match_boz_constant): Mark for translation the
>             message parameter to gfc_invalid_boz using G_().
>             * resolve.c (resolve_elemental_actual):  Mark for translation
>             the string parameter to gfc_check_conformance with _().
>             (resolve_operator):  Mark for translation the string parameter
>             to gfc_check_conformance with _().  Mark translation strings
>             assigned to msg using G_() for use in a call to cfg_warning.

I believe that this is wrong
@@ -67,7 +67,7 @@ gfc_invalid_boz (const char *msg, locus *loc)
       return false;
     }

-  const char hint[] = " [see %<-fno-allow-invalid-boz%>]";
+  const char hint[] = _(" [see %<-fno-allow-invalid-boz%>]");

fortan/lang.opt RejectNegative for allow-invalid-boz.  There
is no option -fno-allow-invalid-boz.

% gfcx -fno-allow-invalid-boz -c a.f90
gfortran: error: unrecognized command-line option '-fno-allow-invalid-boz'; did
you mean '-fallow-invalid-boz'?

Reply via email to