package/joe/0001-disable-bessel-functions-on-uclibc.patch

   1 [PATCH] uClibc can be (and by default is) configured without bessel functions
   2
   3 Signed-off-by: Peter Korsgaard <peter@korsgaard.com>
   4 ---
   5  umath.c |   10 ++++++++++
   6  1 file changed, 10 insertions(+)
   7
   8 Index: joe-3.7/umath.c
   9 ===================================================================
  10 --- joe-3.7.orig/umath.c
  11 +++ joe-3.7/umath.c
  12 @@ -7,6 +7,12 @@
  13   */
  14  #include "types.h"
  15
  16 +/* uClibc can be configured without bessel functions */
  17 +#include <features.h>
  18 +#if defined (__UCLIBC__) && !defined(__DO_XSI_MATH__)
  19 +#define NO_BESSEL
  20 +#endif
  21 +
  22  unsigned char *merr;
  23
  24  int mode_hex;
  25 @@ -396,10 +402,12 @@
  26  double m_fabs(double n) { return fabs(n); }
  27  double m_erf(double n) { return erf(n); }
  28  double m_erfc(double n) { return erfc(n); }
  29 +#ifndef NO_BESSEL
  30  double m_j0(double n) { return j0(n); }
  31  double m_j1(double n) { return j1(n); }
  32  double m_y0(double n) { return y0(n); }
  33  double m_y1(double n) { return y1(n); }
  34 +#endif
  35
  36  double calc(BW *bw, unsigned char *s)
  37  {
  38 @@ -434,10 +442,12 @@
  39                 v = get(USTR "abs"); v->func = m_fabs;
  40                 v = get(USTR "erf"); v->func = m_erf;
  41                 v = get(USTR "erfc"); v->func = m_erfc;
  42 +#ifndef NO_BESSEL
  43                 v = get(USTR "j0"); v->func = m_j0;
  44                 v = get(USTR "j1"); v->func = m_j1;
  45                 v = get(USTR "y0"); v->func = m_y0;
  46                 v = get(USTR "y1"); v->func = m_y1;
  47 +#endif
  48         }
  49
  50         v = get(USTR "top");