math/e_lgammal_r.c

   1 #include <math.h>
   2 #include <stdio.h>
   3 #include <errno.h>
   4 #include <math_private.h>
   5
   6 long double
   7 __ieee754_lgammal_r (long double x, int *signgamp)
   8 {
   9   *signgamp = 0;
  10   fputs ("__ieee754_lgammal_r not implemented\n", stderr);
  11   __set_errno (ENOSYS);
  12   return 0.0;
  13 }
  14 strong_alias (__ieee754_lgammal_r, __lgammal_r_finite)
  15
  16 stub_warning (lgammal)
  17 stub_warning (lgammal_r)