[gcc r17-2795] cobol: Do not rely on %qs in xasprintf.

https://gcc.gnu.org/g:2369b8b1eb8a2950cc2ea11d79e1ee7abc905e15

commit r17-2795-g2369b8b1eb8a2950cc2ea11d79e1ee7abc905e15
Author: James K. Lowden <[email protected]>
Date:   Wed Jul 29 16:04:13 2026 -0400

    cobol: Do not rely on %qs in xasprintf.
    
    gcc/cobol/ChangeLog:
    
            * parse_ante.h (parser_move_carefully): Use ordinary %s in message.

Diff:
---
 gcc/cobol/parse_ante.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/cobol/parse_ante.h b/gcc/cobol/parse_ante.h
index 39f33fdf3b54..49eb90b265ab 100644
--- a/gcc/cobol/parse_ante.h
+++ b/gcc/cobol/parse_ante.h
@@ -3436,7 +3436,7 @@ parser_move_carefully( const char */*F*/, int /*L*/,
 
     if( is_index ) {
       if( tgt.field->type != FldIndex && src.field->type != FldIndex) {
-        auto msg = xasprintf("invalid SET %qs (%s) TO %qs (%s): not a field index",
+        auto msg = xasprintf("invalid SET %s (%s) TO %s (%s): not a field index",
                              name_of(tgt.field), cbl_field_type_name(tgt.field->type),
                              name_of(src.field), cbl_field_type_name(src.field->type));
         dialect_ok(src.loc, MfSetNumeric, msg);