[Ada] Fix off-by-one bug in underflow handling of Scaling
authorEric Botcazou <ebotcazou@adacore.com>
Wed, 20 Jan 2021 16:08:51 +0000 (17:08 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 6 May 2021 07:51:34 +0000 (03:51 -0400)
commitbcc6807c4bbcb782cc0f1453bb9275d52a7e1638
treed679e6a2f3b746b986ce4db6b2a9bda10110d8bc
parente18e1b5f524507fd7b7d8bd4d674bc63333a5679
[Ada] Fix off-by-one bug in underflow handling of Scaling

gcc/ada/

* libgnat/s-fatgen.adb (Scaling): Fix off-by-one bug for underflow.
gcc/ada/libgnat/s-fatgen.adb