From 7afbd9419f78de69a9bbbd90ad10e38f4ed77d65 Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Tue, 17 Sep 2019 08:02:41 +0000 Subject: [PATCH] [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 gcc/ada/ * exp_dbug.ads: Update character type comment. From-SVN: r275793 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/exp_dbug.ads | 17 ++++++++++------- 2 files changed, 14 insertions(+), 7 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 0d7fc8f8710..6ceb7aecfac 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2019-09-17 Tom Tromey + + * exp_dbug.ads: Update character type comment. + 2019-09-17 Yannick Moy * libgnat/s-arit64.adb (Double_Divide): Simplify needlessly diff --git a/gcc/ada/exp_dbug.ads b/gcc/ada/exp_dbug.ads index 57687347f5f..93b978378f9 100644 --- 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 -- -- 2.30.2