diff mbox series

[COMMITTED] ada: Don't pretty-print DEL within expression images

Message ID 20230522084924.1725379-1-poulhies@adacore.com
State Accepted
Headers
Series [COMMITTED] ada: Don't pretty-print DEL within expression images |

Checks

Context Check Description
snail/gcc-patch-check success Github commit url

Commit Message

Marc Poulhiès May 22, 2023, 8:49 a.m. UTC 
  From: Piotr Trojanek <trojanek@adacore.com>

When printing expression images, e.g. for GNATprove counterexamples,
it seems better to print DEL not directly but with its numeric code.

gcc/ada/

	* pprint.adb (Expr_Name): Exclude DEL from printable range.

Tested on x86_64-pc-linux-gnu, committed on master.

---
 gcc/ada/pprint.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
diff mbox series

Patch

diff --git a/gcc/ada/pprint.adb b/gcc/ada/pprint.adb
index 8cc92445080..526b70f7996 100644
--- a/gcc/ada/pprint.adb
+++ b/gcc/ada/pprint.adb
@@ -195,7 +195,7 @@  package body Pprint is
                declare
                   Char : constant Int := UI_To_Int (Char_Literal_Value (Expr));
                begin
-                  if Char in 32 .. 127 then
+                  if Char in 32 .. 126 then
                      return "'" & Character'Val (Char) & "'";
                   else
                      UI_Image (Char_Literal_Value (Expr));