src/math/nan.c

   1 /*
   2  * nan: generate quiet NaNs, if supported.
   3  * Copyright (C) 2010 Nick Bowler.
   4  *
   5  * License LGPLv3+: GNU LGPL version 3 or later.  See COPYING.LIB for terms.
   6  * See <http://www.gnu.org/licenses/lgpl.html> if you did not receive a copy.
   7  * This is free software: you are free to change and redistribute it.
   8  * There is NO WARRANTY, to the extent permitted by law.
   9  */
  10
  11 #include <cstd/mathcommon.h>
  12
  13 TYPE MF(nan)(const char *tagp)
  14 {
  15 #ifdef NAN
  16         return NAN;
  17 #else
  18         return 0;
  19 #endif
  20 }