[Ada] Use Standard.Natural on bit references to packed arrays
authorEric Botcazou <ebotcazou@adacore.com>
Mon, 16 Dec 2019 10:18:59 +0000 (11:18 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 2 Jun 2020 08:58:11 +0000 (04:58 -0400)
commit0c6eef3096edafbcc857319efff2377dd63be7cb
treedf3abfe2476b77d4dc08df37f261444126068ab0
parentea55d344b17b19b866cdc189268547d677959cb1
[Ada] Use Standard.Natural on bit references to packed arrays

2020-06-02  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

* exp_pakd.adb (Expand_Packed_Bit_Reference): Change type of
reference from Universal_Integer to Standard_Natural.
gcc/ada/exp_pakd.adb