xref: /netbsd-src/external/gpl3/gcc/dist/libquadmath/math/nanq.c (revision 181254a7b1bdde6873432bffef2d2decc4b5c22f)
1*181254a7Smrg #include "quadmath-imp.h"
2*181254a7Smrg 
3*181254a7Smrg __float128
nanq(const char * tagp)4*181254a7Smrg nanq (const char *tagp __attribute__ ((unused)))
5*181254a7Smrg {
6*181254a7Smrg   // FIXME -- we should use the argument
7*181254a7Smrg   ieee854_float128 f = { 0 };
8*181254a7Smrg   f.ieee_nan.exponent = 0x7fff;
9*181254a7Smrg   f.ieee_nan.quiet_nan = 0x1;
10*181254a7Smrg   return f.value;
11*181254a7Smrg }
12