[Ada] Fix regression of ACATS c46032a with CCG back end
authorJavier Miranda <miranda@adacore.com>
Mon, 28 May 2018 08:55:42 +0000 (08:55 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Mon, 28 May 2018 08:55:42 +0000 (08:55 +0000)
commit04920bb67f9d7014248beed823a6a4ac50dbedd4
tree10ab30d2d05f7663463c759120b58cdcc8779705
parentcb1a067201dec2585968531ee1a03363bf9210f5
[Ada] Fix regression of ACATS c46032a with CCG back end

2018-05-28  Javier Miranda  <miranda@adacore.com>

gcc/ada/

* exp_ch4.adb (Real_Range_Check): Add a temporary to store the integer
value when converting a float value to a fixed-point value. This is
required for CCG because it handles fixed-point types by means of
unsigned integer type variables. The range check is now performed using
the integer value stored in this temporary.

From-SVN: r260837
gcc/ada/ChangeLog
gcc/ada/exp_ch4.adb