| commit | a186dd158decad693bd18c95962a9ea61022166c | [log] [tgz] |
|---|---|---|
| author | Marc Poulhiès <poulhies@adacore.com> | Tue Nov 15 16:47:59 2022 +0100 |
| committer | Marc Poulhiès <poulhies@adacore.com> | Mon Nov 21 11:10:34 2022 +0100 |
| tree | a83a6beea57a57edd33966496ab0ead1af20ebfb | |
| parent | 6f089469f4f0960818498ca5ad2bd3797a4b1d43 [diff] |
ada: Do not share Packed Array Type if sizes of types differ If a subtype has a Size attribute value different than the size of its ancestor, then the Packed Array Type can't be shared and a new one must be created. gcc/ada/ * exp_pakd.adb (Create_Packed_Array_Impl_Type): Do not share PAT if sizes of types differ.