dnl Copyright (C) 2007, 2009-2011 Free Software Foundation, Inc.
dnl This file is free software; the Free Software Foundation
dnl gives unlimited permission to copy and/or distribute it,
dnl Copyright (C) 2007, 2009-2011 Free Software Foundation, Inc.
dnl This file is free software; the Free Software Foundation
dnl gives unlimited permission to copy and/or distribute it,
- if (signbitl (minus_zerol) && !signbitl (roundl (minus_zerol)))
- return 1;
- return 0;
+ if (signbitl (minus_zerol) && !signbitl (my_roundl (minus_zerol)))
+ result |= 1;
+ /* Test whether roundl (-0.3L) is -0.0L. */
+ if (signbitl (-0.3L) && !signbitl (my_roundl (-0.3L)))
+ result |= 2;
+ return result;