On Sun, Apr 06, 2025 at 08:52:53PM +0100, Iain Sandoe wrote:
> --- a/gcc/cobol/parse.y
> +++ b/gcc/cobol/parse.y
> @@ -6971,9 +6971,9 @@ section_kw:     SECTION
>                  {
>                    if( $1 ) {
>                   if( *$1 == '-' ) {
> -                   error_msg(@1, "SECTION segment %s is negative", $1);
> +                   error_msg(@1, "SECTION segment %<%s%> is negative", $1);

%qs instead of %<%s%> ?

>                      } else {
> -                      cbl_unimplementedw("SECTION segment %s was ignored", 
> $1);
> +                      error_msg(@1, "SECTION segment %<%s%> was ignored", 
> $1);

Ditto?

        Jakub

Reply via email to