From 4930e82f63b98fa637e27a53f1722fe63b7e3be2 Mon Sep 17 00:00:00 2001
From: Viljar Indus <indus@adacore.com>
Date: Thu, 18 Jul 2024 10:52:03 +0300
Subject: [PATCH] ada: Use the same warning character in continuations
gcc/ada/
* gcc-interface/decl.cc: Use same warning characters in
continuation messages.
* gcc-interface/trans.cc: Likewise.
---
gcc/ada/gcc-interface/decl.cc | 8 ++++----
gcc/ada/gcc-interface/trans.cc | 14 +++++++-------
2 files changed, 11 insertions(+), 11 deletions(-)
diff --git a/gcc/ada/gcc-interface/decl.cc b/gcc/ada/gcc-interface/decl.cc
index 655ba0b8a105..4252e627b0ce 100644
--- a/gcc/ada/gcc-interface/decl.cc
+++ b/gcc/ada/gcc-interface/decl.cc
@@ -1430,7 +1430,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, bool definition)
post_error
("??too large object cannot be allocated statically",
gnat_entity);
- post_error ("\\?dynamic allocation will be used instead",
+ post_error ("\\??dynamic allocation will be used instead",
gnat_entity);
}
@@ -6565,7 +6565,7 @@ gnat_to_gnu_subprog_type (Entity_Id gnat_subprog, bool definition,
("??cannot import type-generic 'G'C'C builtin!",
gnat_subprog);
post_error
- ("\\?use a supported result type",
+ ("\\??use a supported result type",
gnat_subprog);
gnu_builtin_decl = NULL_TREE;
}
@@ -6587,7 +6587,7 @@ gnat_to_gnu_subprog_type (Entity_Id gnat_subprog, bool definition,
("??cannot import type-generic 'G'C'C builtin!",
gnat_subprog);
post_error
- ("\\?use a supported second parameter type",
+ ("\\??use a supported second parameter type",
gnat_subprog);
gnu_builtin_decl = NULL_TREE;
}
@@ -6608,7 +6608,7 @@ gnat_to_gnu_subprog_type (Entity_Id gnat_subprog, bool definition,
("??cannot import type-generic 'G'C'C builtin!",
gnat_subprog);
post_error
- ("\\?use a supported third parameter type",
+ ("\\??use a supported third parameter type",
gnat_subprog);
gnu_builtin_decl = NULL_TREE;
}
diff --git a/gcc/ada/gcc-interface/trans.cc b/gcc/ada/gcc-interface/trans.cc
index 92e000686fb2..710907bb999f 100644
--- a/gcc/ada/gcc-interface/trans.cc
+++ b/gcc/ada/gcc-interface/trans.cc
@@ -4949,10 +4949,10 @@ Call_to_gnu (Node_Id gnat_node, tree *gnu_result_type_p, tree gnu_target,
("unchecked conversion implemented by copy??",
gnat_actual);
post_error
- ("\\?use pragma Universal_Aliasing on either type",
+ ("\\??use pragma Universal_Aliasing on either type",
gnat_actual);
post_error
- ("\\?to enable RM 13.9(12) implementation permission",
+ ("\\??to enable RM 13.9(12) implementation permission",
gnat_actual);
}
@@ -4962,10 +4962,10 @@ Call_to_gnu (Node_Id gnat_node, tree *gnu_result_type_p, tree gnu_target,
("value conversion implemented by copy??",
gnat_actual);
post_error
- ("\\?use pair of types with same root type",
+ ("\\??use pair of types with same root type",
gnat_actual);
post_error
- ("\\?to avoid new object in RM 4.6(58.5/5)",
+ ("\\??to avoid new object in RM 4.6(58.5/5)",
gnat_actual);
}
}
@@ -10644,9 +10644,9 @@ validate_unchecked_conversion (Node_Id gnat_node)
{
post_error_ne ("??possible aliasing problem for type&",
gnat_node, Target_Type (gnat_node));
- post_error ("\\?use -fno-strict-aliasing switch for references",
+ post_error ("\\??use -fno-strict-aliasing switch for references",
gnat_node);
- post_error_ne ("\\?or use `pragma No_Strict_Aliasing (&);`",
+ post_error_ne ("\\??or use `pragma No_Strict_Aliasing (&);`",
gnat_node, Target_Type (gnat_node));
}
}
@@ -10670,7 +10670,7 @@ validate_unchecked_conversion (Node_Id gnat_node)
{
post_error_ne ("??possible aliasing problem for type&",
gnat_node, Target_Type (gnat_node));
- post_error ("\\?use -fno-strict-aliasing switch for references",
+ post_error ("\\??use -fno-strict-aliasing switch for references",
gnat_node);
}
}
--
GitLab