diff options
| author | ro <ro@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-02-24 15:35:40 +0000 |
|---|---|---|
| committer | ro <ro@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-02-24 15:35:40 +0000 |
| commit | e4588211713e0abdabf83aa1829d77b227cb1e31 (patch) | |
| tree | f87c8b6657e4222c24f8d10a01bc3723e19041a5 /libgfortran | |
| parent | 58fba9de83f3e8bd30a1bcd2be968890b3568fd9 (diff) | |
| download | gcc-e4588211713e0abdabf83aa1829d77b227cb1e31.tar.gz | |
* io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@157048 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran')
| -rw-r--r-- | libgfortran/ChangeLog | 4 | ||||
| -rw-r--r-- | libgfortran/io/write_float.def | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 0d33a7df2ef..b674f5c3466 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,7 @@ +2010-02-24 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> + + * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit. + 2010-02-22 Jerry DeLisle <jvdelisle@gcc.gnu.org> * io/list_read.c (list_formatted_read_scalar): Remove duplicate code. diff --git a/libgfortran/io/write_float.def b/libgfortran/io/write_float.def index eca0e56a5e9..b945eb012db 100644 --- a/libgfortran/io/write_float.def +++ b/libgfortran/io/write_float.def @@ -1,4 +1,4 @@ -/* Copyright (C) 2007, 2008, 2009 Free Software Foundation, Inc. +/* Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. Contributed by Andy Vaught Write float code factoring to this file by Jerry DeLisle F2003 I/O support contributed by Jerry DeLisle @@ -818,7 +818,7 @@ sprintf (buffer, "%+-#" STR(MIN_FIELD_WIDTH) ".*" \ {\ GFC_REAL_ ## x tmp;\ tmp = * (GFC_REAL_ ## x *)source;\ - sign_bit = signbit (tmp);\ + sign_bit = __builtin_signbit (tmp);\ if (!isfinite (tmp))\ { \ write_infnan (dtp, f, isnan (tmp), sign_bit);\ |