cobol: Do not rely on %qs in xasprintf.

gcc/cobol/ChangeLog:

	* parse_ante.h (parser_move_carefully): Use ordinary %s in message.

diff --git a/gcc/cobol/parse_ante.h b/gcc/cobol/parse_ante.h
index 39f33fdf3b54ce3a2d55af6aafe62a7c55231e91..49eb90b265ab6079302a99c87f8080b56f008e4e 100644 (file)
--- 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);