[Ada] Adjust support for 128-bit integer types in System.Random_Numbers
authorEric Botcazou <ebotcazou@adacore.com>
Tue, 13 Oct 2020 07:15:23 +0000 (09:15 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Wed, 25 Nov 2020 13:22:28 +0000 (08:22 -0500)
commit9d41d78b05f262d638fa205c7d60415321535834
tree6785031d2339fa5097981501e207524cfabaefef
parenta8c229e14c4d6c5c6e2d1ff18741e89d7149d81d
[Ada] Adjust support for 128-bit integer types in System.Random_Numbers

gcc/ada/

* libgnat/s-rannum.adb (Random_Discrete): Specifically deal with
the case where the size of the base type is larger than 64 bits.
gcc/ada/libgnat/s-rannum.adb