diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2024-01-30 01:05:28 +0100 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2024-05-13 10:03:32 +0200 |
| commit | 1de93edbdecc68503b66652b810213492d69ba7b (patch) | |
| tree | be1a05744fd1cdc9e48daa787dfaa25c33b87775 /gcc/ada | |
| parent | da8847559413c15fb6da1455eb1184f7aa928678 (diff) | |
| download | gcc-1de93edbdecc68503b66652b810213492d69ba7b.zip gcc-1de93edbdecc68503b66652b810213492d69ba7b.tar.gz gcc-1de93edbdecc68503b66652b810213492d69ba7b.tar.bz2 | |
ada: Fix style in comments
Code cleanup.
gcc/ada/
* contracts.adb (Inherit_Subprogram_Contract): Fix style.
* sem_ch5.adb (Analyze_Iterator_Specification): Likewise.
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/contracts.adb | 2 | ||||
| -rw-r--r-- | gcc/ada/sem_ch5.adb | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/contracts.adb b/gcc/ada/contracts.adb index c440053..c04d850 100644 --- a/gcc/ada/contracts.adb +++ b/gcc/ada/contracts.adb @@ -3620,7 +3620,7 @@ package body Contracts is end if; end Inherit_Pragma; - -- Start of processing for Inherit_Subprogram_Contract + -- Start of processing for Inherit_Subprogram_Contract begin -- Inheritance is carried out only when both entities are subprograms diff --git a/gcc/ada/sem_ch5.adb b/gcc/ada/sem_ch5.adb index dc9524b..2677a2c 100644 --- a/gcc/ada/sem_ch5.adb +++ b/gcc/ada/sem_ch5.adb @@ -2158,7 +2158,7 @@ package body Sem_Ch5 is return Etype (Ent); end Get_Cursor_Type; - -- Start of processing for Analyze_Iterator_Specification + -- Start of processing for Analyze_Iterator_Specification begin Enter_Name (Def_Id); |