[Ada] Continuation of "Get rid of more references to Universal_Integer"
authorArnaud Charlet <charlet@adacore.com>
Mon, 20 Jan 2020 11:07:09 +0000 (06:07 -0500)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 4 Jun 2020 09:10:58 +0000 (05:10 -0400)
commitbbe376e136edb8456088d7298d4ba7c93d4e0529
tree1fc4c406cbf682ba9aa64a86ae8173907e15c282
parent8b3bf48a31e4eb238ae8bd61b9ff9d4c6abb932e
[Ada] Continuation of "Get rid of more references to Universal_Integer"

2020-06-04  Arnaud Charlet  <charlet@adacore.com>

gcc/ada/

* libgnat/s-atopar.adb, libgnat/s-atopex.adb: Use Object_Size
instead of Size, otherwise many derived types will be rejected
(e.g. a type with a 14 bits 'Size and a 16 bits 'Object_Size).
gcc/ada/libgnat/s-atopar.adb
gcc/ada/libgnat/s-atopex.adb