[Ada] Update the character type comment in exp_dbug.ads

The character type comment in exp_dbug.ads documented the QU and QW
encodings, but did not document the plain "Qc" encoding, where 'c' is
the character itself.  This patch updates the comment to follow the
implementation.

2019-09-17  Tom Tromey  <tromey@adacore.com>

gcc/ada/

	* exp_dbug.ads: Update character type comment.

From-SVN: r275793

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 0d7fc8f8710aec08c88d2fceee47dac24496eee8..6ceb7aecfac210d539afcfc6fc22601847c9a5b6 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2019-09-17  Tom Tromey  <tromey@adacore.com>
+
+       * exp_dbug.ads: Update character type comment.
+
 2019-09-17  Yannick Moy  <moy@adacore.com>
 
        * libgnat/s-arit64.adb (Double_Divide): Simplify needlessly

diff --git a/gcc/ada/exp_dbug.ads b/gcc/ada/exp_dbug.ads
index 57687347f5f053c5ab09816ab801599f7417b1bd..93b978378f9e5d4b4f4ad94bfc0c6eed654c80ce 100644 (file)
--- a/gcc/ada/exp_dbug.ads
+++ b/gcc/ada/exp_dbug.ads
@@ -1452,18 +1452,21 @@ package Exp_Dbug is
    --  a character literal, the name is encoded as described in the following
    --  paragraph.
 
-   --  A name QUhh, where each 'h' is a lower-case hexadecimal digit, stands
-   --  for a character whose Unicode encoding is hh, and QWhhhh likewise stands
-   --  for a wide character whose encoding is hhhh. The representation values
-   --  are encoded as for ordinary enumeration literals (and have no necessary
-   --  relationship to the values encoded in the names).
+   --  The characters 'a'..'z' and '0'..'9' are represented as Qc, where 'c'
+   --  stands for the character itself.  A name QUhh, where each 'h' is a
+   --  lower-case hexadecimal digit, stands for a character whose Unicode
+   --  encoding is hh, and QWhhhh likewise stands for a wide character whose
+   --  encoding is hhhh. The representation values are encoded as for ordinary
+   --  enumeration literals (and have no necessary relationship to the values
+   --  encoded in the names).
 
    --  For example, given the type declaration
 
-   --    type x is (A, 'C', B);
+   --    type x is (A, 'C', 'b');
 
    --  the second enumeration literal would be named QU43 and the value
-   --  assigned to it would be 1.
+   --  assigned to it would be 1, and the third enumeration literal would be
+   --  named Qb and the value assigned to it would be 2.
 
    -----------------------------------------------
    -- Secondary Dispatch tables of tagged types --