[Bug ada/60730] 'Round of a fixed point type incorrectly truncates its operand instead of rounding it

["georggcc at googlemail dot com" <gcc-bugzilla@gcc.gnu.org>]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60730

--- Comment #3 from Georg <georggcc at googlemail dot com> ---
I have used the new simplified bug reporting form, hence no triple.

Several platforms are affected; the GCC 4.9 used with this report
was built on Darwin Kernel Version 13.1.0: Thu Jan 16 19:40:37
PST 2014; root:xnu-2422.90.20~2/RELEASE_X86_64 x86_64.
See -v below.

According to the first public mention, these are also
affected (quoting the USENET message):
gnat 4.6.3 ("debian stable kfreebsd"), 
gnat-aux 4.7.3 ("from FreeBSD ports").

I also just checked the gcc build for dotnet-GNAT
(GNAT GPL (20130314)), same result.

$ gcc -v
COLLECT_GCC=/Volumes/Macintosh HD/Users/bauhaus/4.9/bin/gcc
COLLECT_LTO_WRAPPER=/Volumes/Macintosh\
HD/Users/bauhaus/4.9/bin/../libexec/gcc/x86_64-apple-darwin13.1.0/4.9.0/lto-wrapper
Target: x86_64-apple-darwin13.1.0
Configured with: /Macintosh_HD/Users/bauhaus/src/GCC-trunk/configure
--prefix=/Macintosh_HD/Users/bauhaus/4.9 --disable-nls
--enable-languages=c,ada,c++ CC=gcc
Thread model: posix
gcc version 4.9.0 20140331 (experimental) (GCC)