diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2020-11-14 23:26:05 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-11-30 09:16:20 -0500 |
| commit | 348050563099e7b73e37d28d10beac3a7dec1a86 (patch) | |
| tree | ca90a4afe04b598c5698bd9967234a7a73f3be3d /gcc/ada/lib-xref.adb | |
| parent | c1a69c98717d9c63ffde67746c56243d530c9109 (diff) | |
| download | gcc-348050563099e7b73e37d28d10beac3a7dec1a86.zip gcc-348050563099e7b73e37d28d10beac3a7dec1a86.tar.gz gcc-348050563099e7b73e37d28d10beac3a7dec1a86.tar.bz2 | |
[Ada] Minor reuse Is_Protected_Component
gcc/ada/
* lib-xref.adb (Generate_Reference): Fix reference to
Analyze_Assignment.
* sem_ch5.adb (Diagnose_Non_Variable_Lhs): Reuse existing
utility function.
Diffstat (limited to 'gcc/ada/lib-xref.adb')
| -rw-r--r-- | gcc/ada/lib-xref.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/lib-xref.adb b/gcc/ada/lib-xref.adb index 64b9683..0869906 100644 --- a/gcc/ada/lib-xref.adb +++ b/gcc/ada/lib-xref.adb @@ -819,7 +819,7 @@ package body Lib.Xref is end if; -- For the left hand of an assignment case, we do nothing here. - -- The processing for Analyze_Assignment_Statement will set the + -- The processing for Analyze_Assignment will set the -- Referenced_As_LHS flag. else |