diff options
Diffstat (limited to 'gcc/ada/exp_ch3.adb')
| -rw-r--r-- | gcc/ada/exp_ch3.adb | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gcc/ada/exp_ch3.adb b/gcc/ada/exp_ch3.adb index d1865038361..5035751e390 100644 --- a/gcc/ada/exp_ch3.adb +++ b/gcc/ada/exp_ch3.adb @@ -6115,9 +6115,8 @@ package body Exp_Ch3 is -- This is done unconditionally to ensure that tools can be linked -- properly with user programs compiled with older language versions. - -- It might be worth including a switch to revert to a non-composable - -- equality for untagged records, even though no program depending on - -- non-composability has surfaced ??? + -- In addition, this is needed because "=" composes for bounded strings + -- in all language versions (see Exp_Ch4.Expand_Composite_Equality). elsif Comes_From_Source (Def_Id) and then Convention (Def_Id) = Convention_Ada |