Branch oldpackages for 14.07
[14.07/packages.git] / utils / joe / patches / 001-mathaway.patch
1 --- a/umath.c
2 +++ b/umath.c
3 @@ -378,7 +378,6 @@ double m_cos(double n) { return cos(n); 
4  double m_tan(double n) { return tan(n); }
5  double m_exp(double n) { return exp(n); }
6  double m_sqrt(double n) { return sqrt(n); }
7 -double m_cbrt(double n) { return cbrt(n); }
8  double m_log(double n) { return log(n); }
9  double m_log10(double n) { return log10(n); }
10  double m_asin(double n) { return asin(n); }
11 @@ -387,19 +386,10 @@ double m_atan(double n) { return atan(n)
12  double m_sinh(double n) { return sinh(n); }
13  double m_cosh(double n) { return cosh(n); }
14  double m_tanh(double n) { return tanh(n); }
15 -double m_asinh(double n) { return asinh(n); }
16 -double m_acosh(double n) { return acosh(n); }
17 -double m_atanh(double n) { return atanh(n); }
18  double m_int(double n) { return (int)(n); }
19  double m_floor(double n) { return floor(n); }
20  double m_ceil(double n) { return ceil(n); }
21  double m_fabs(double n) { return fabs(n); }
22 -double m_erf(double n) { return erf(n); }
23 -double m_erfc(double n) { return erfc(n); }
24 -double m_j0(double n) { return j0(n); }
25 -double m_j1(double n) { return j1(n); }
26 -double m_y0(double n) { return y0(n); }
27 -double m_y1(double n) { return y1(n); }
28  
29  double calc(BW *bw, unsigned char *s)
30  {
31 @@ -414,7 +404,6 @@ double calc(BW *bw, unsigned char *s)
32                 v = get(USTR "tan"); v->func = m_tan;
33                 v = get(USTR "exp"); v->func = m_exp;
34                 v = get(USTR "sqrt"); v->func = m_sqrt;
35 -               v = get(USTR "cbrt"); v->func = m_cbrt;
36                 v = get(USTR "ln"); v->func = m_log;
37                 v = get(USTR "log"); v->func = m_log10;
38                 v = get(USTR "asin"); v->func = m_asin;
39 @@ -425,19 +414,10 @@ double calc(BW *bw, unsigned char *s)
40                 v = get(USTR "sinh"); v->func = m_sinh;
41                 v = get(USTR "cosh"); v->func = m_cosh;
42                 v = get(USTR "tanh"); v->func = m_tanh;
43 -               v = get(USTR "asinh"); v->func = m_asinh;
44 -               v = get(USTR "acosh"); v->func = m_acosh;
45 -               v = get(USTR "atanh"); v->func = m_atanh;
46                 v = get(USTR "int"); v->func = m_int;
47                 v = get(USTR "floor"); v->func = m_floor;
48                 v = get(USTR "ceil"); v->func = m_ceil;
49                 v = get(USTR "abs"); v->func = m_fabs;
50 -               v = get(USTR "erf"); v->func = m_erf;
51 -               v = get(USTR "erfc"); v->func = m_erfc;
52 -               v = get(USTR "j0"); v->func = m_j0;
53 -               v = get(USTR "j1"); v->func = m_j1;
54 -               v = get(USTR "y0"); v->func = m_y0;
55 -               v = get(USTR "y1"); v->func = m_y1;
56         }
57  
58         v = get(USTR "top");