math/e_jnl.c

   1 #include <math.h>
   2 #include <stdio.h>
   3 #include <errno.h>
   4 #include <math_private.h>
   5
   6 long double
   7 __ieee754_jnl (int n, long double x)
   8 {
   9   fputs ("__ieee754_jnl not implemented\n", stderr);
  10   __set_errno (ENOSYS);
  11   return 0.0;
  12 }
  13 strong_alias (__ieee754_jnl, __jnl_finite)
  14
  15 stub_warning (jnl)
  16
  17 long double
  18 __ieee754_ynl (int n, long double x)
  19 {
  20   fputs ("__ieee754_ynl not implemented\n", stderr);
  21   __set_errno (ENOSYS);
  22   return 0.0;
  23 }
  24 strong_alias (__ieee754_ynl, __ynl_finite)
  25
  26 stub_warning (ynl)