k_log.h (21673) | k_log.h (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 --- |