Deleted Added
sdiff udiff text old ( 21673 ) new ( 22808 )
full compact
e_log.c (21673) e_log.c (22808)
1/* @(#)e_log.c 5.1 93/09/24 */
2/*
3 * ====================================================
4 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5 *
6 * Developed at SunPro, a Sun Microsystems, Inc. business.
7 * Permission to use, copy, modify, and distribute this
8 * software is freely granted, provided that this notice
9 * is preserved.
10 * ====================================================
11 */
12
13#ifndef lint
1/* @(#)e_log.c 5.1 93/09/24 */
2/*
3 * ====================================================
4 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
5 *
6 * Developed at SunPro, a Sun Microsystems, Inc. business.
7 * Permission to use, copy, modify, and distribute this
8 * software is freely granted, provided that this notice
9 * is preserved.
10 * ====================================================
11 */
12
13#ifndef lint
14static char rcsid[] = "$FreeBSD: head/lib/msun/src/e_log.c 21673 1997-01-14 07:20:47Z jkh $";
14static char rcsid[] = "$FreeBSD: head/lib/msun/src/e_log.c 22808 1997-02-16 18:26:31Z bde $";
15#endif
16
17/* __ieee754_log(x)
18 * Return the logrithm of x
19 *
20 * Method :
21 * 1. Argument Reduction: find k and f such that
22 * x = 2^k * (1+f),

--- 63 unchanged lines hidden (view full) ---

86
87#ifdef __STDC__
88static const double zero = 0.0;
89#else
90static double zero = 0.0;
91#endif
92
93#ifdef __STDC__
15#endif
16
17/* __ieee754_log(x)
18 * Return the logrithm of x
19 *
20 * Method :
21 * 1. Argument Reduction: find k and f such that
22 * x = 2^k * (1+f),

--- 63 unchanged lines hidden (view full) ---

86
87#ifdef __STDC__
88static const double zero = 0.0;
89#else
90static double zero = 0.0;
91#endif
92
93#ifdef __STDC__
94 double __ieee754_log(double x)
94 double __generic___ieee754_log(double x)
95#else
95#else
96 double __ieee754_log(x)
96 double __generic___ieee754_log(x)
97 double x;
98#endif
99{
100 double hfsq,f,s,z,R,w,t1,t2,dk;
101 int32_t k,hx,i,j;
102 u_int32_t lx;
103
104 EXTRACT_WORDS(hx,lx,x);

--- 42 unchanged lines hidden --- 		97 double x;
98#endif
99{
100 double hfsq,f,s,z,R,w,t1,t2,dk;
101 int32_t k,hx,i,j;
102 u_int32_t lx;
103
104 EXTRACT_WORDS(hx,lx,x);

--- 42 unchanged lines hidden ---