diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2022-01-13 22:29:01 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-05-09 09:27:35 +0000 |
| commit | 00b21aa982e71575f2a403c94e8086eb2a6264d2 (patch) | |
| tree | 47dfed3ef75995f790def9cb393f424c5763c8dd /gcc/ada/libgnat/a-cfhama.adb | |
| parent | 7ded77bbce506b12a4f2bbe751b304ebdcb9af27 (diff) | |
| download | gcc-00b21aa982e71575f2a403c94e8086eb2a6264d2.zip gcc-00b21aa982e71575f2a403c94e8086eb2a6264d2.tar.gz gcc-00b21aa982e71575f2a403c94e8086eb2a6264d2.tar.bz2 | |
[Ada] Fix indentation of "Start of processing for ..." labels
The "Start of processing for ..." labels should be aligned with the
BEGIN that follows. Violations found with:
$ grep -Pzo "( *) \-\- Start of processing for \w+\n\n\1begin" *.adb
and corrected manually, because some of them had to be entirely removed.
Also, remove trailing semicolons found while guessing the grep pattern.
gcc/ada/
* exp_aggr.adb, exp_ch3.adb, exp_util.adb, freeze.adb,
gnatfind.adb, gnatlink.adb, gnatxref.adb, gprep.adb,
libgnat/a-cfhama.adb, libgnat/g-alleve.adb, sem_ch12.adb,
sem_ch13.adb, xr_tabls.adb: Fix style labels.
Diffstat (limited to 'gcc/ada/libgnat/a-cfhama.adb')
| -rw-r--r-- | gcc/ada/libgnat/a-cfhama.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/libgnat/a-cfhama.adb b/gcc/ada/libgnat/a-cfhama.adb index 48950de..da20b93 100644 --- a/gcc/ada/libgnat/a-cfhama.adb +++ b/gcc/ada/libgnat/a-cfhama.adb @@ -151,7 +151,7 @@ is Insert (Target, N.Key, N.Element); end Insert_Element; - -- Start of processing for Assign + -- Start of processing for Assign begin if Target'Address = Source'Address then |