[PATCH] PR fortran/66864 -- Use the right precision in FLOOR()

[Steve Kargl]

The attached patch fixes an issue in the constant 
folding of FLOOR().  In the old code, the precision
of an temporary MPFR variable was set according to
the requested kind of the INTEGER result, ie., the
wrong precision.  The patch sets the precision to
the precision of the arg of FLOOR().  Regression
tested on trunk.  OK to commit.

2015-07-14  Steven G. Kargl  <kargl@gcc.gnu.org>

	* simplify.c (gfc_simplify_floor): Set precision of temporary to
	that of arg.

2015-07-14  Steven G. Kargl  <kargl@gcc.gnu.org>

	gfortran.dg/pr66864.f90: New test.


-- 
Steve
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr66864.diff
Type: text/x-diff
Size: 1214 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20150714/a4f0a9a9/attachment.bin>