PR fortran/46416

[pf3gnuchains/gcc-fork.git] / libquadmath / math / cosq.c

diff --git a/libquadmath/math/cosq.c b/libquadmath/math/cosq.c
index 1695551..dc321a2 100644 (file)
--- a/libquadmath/math/cosq.c
+++ b/libquadmath/math/cosq.c
@@ -49,7 +49,7 @@
 __float128
 cosq (__float128 x)
 {
 __float128
 cosq (__float128 x)
 {

-       __float128 y[2],z=0.0L;
+       __float128 y[2],z=0.0Q;

        int64_t n, ix;
 
     /* High word of x. */
        int64_t n, ix;
 
     /* High word of x. */