diff options
| author | Ghjuvan Lacambre <lacambre@adacore.com> | 2021-06-22 14:35:16 +0200 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-09-20 12:31:29 +0000 |
| commit | 66fa923768870fbd943ad986d0f501cef21bd958 (patch) | |
| tree | 56ae50173f2aeb7a1cea6405ba3fafcc0b04c976 | |
| parent | 8967ee52ea92c865801d6137600e33e4a32cd2ec (diff) | |
| download | gcc-66fa923768870fbd943ad986d0f501cef21bd958.zip gcc-66fa923768870fbd943ad986d0f501cef21bd958.tar.gz gcc-66fa923768870fbd943ad986d0f501cef21bd958.tar.bz2 | |
[Ada] Capitalize comment
gcc/ada/
* sem_dim.adb (Dimensions_Msg_Of): Capitalize comment.
| -rw-r--r-- | gcc/ada/sem_dim.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_dim.adb b/gcc/ada/sem_dim.adb index b303229..538da57 100644 --- a/gcc/ada/sem_dim.adb +++ b/gcc/ada/sem_dim.adb @@ -318,7 +318,7 @@ package body Sem_Dim is (N : Node_Id; Description_Needed : Boolean := False) return String; -- Given a node N, return the dimension symbols of N, preceded by "has - -- dimension" if Description_Needed. if N is dimensionless, return "'[']", + -- dimension" if Description_Needed. If N is dimensionless, return "'[']", -- or "is dimensionless" if Description_Needed. function Dimension_System_Root (T : Entity_Id) return Entity_Id; |