missing/isnan.c

   1 /* public domain rewrite of isnan(3) */
   2
   3 static int double_ne(double n1, double n2);
   4
   5 int
   6 isnan(double n)
   7 {
   8     return double_ne(n, n);
   9 }
  10
  11 static int
  12 double_ne(double n1, double n2)
  13 {
  14     return n1 != n2;
  15 }