Print this page
5261 libm should stop using synonyms.h

Split Close
Expand all
Collapse all
          --- old/usr/src/lib/libm/common/LD/tanhl.c
          +++ new/usr/src/lib/libm/common/LD/tanhl.c
↓ open down ↓ 19 lines elided ↑ open up ↑
  20   20   */
  21   21  
  22   22  /*
  23   23   * Copyright 2011 Nexenta Systems, Inc.  All rights reserved.
  24   24   */
  25   25  /*
  26   26   * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
  27   27   * Use is subject to license terms.
  28   28   */
  29   29  
  30      -#pragma weak tanhl = __tanhl
       30 +#pragma weak __tanhl = tanhl
  31   31  
  32   32  /*
  33   33   * tanhl(x) returns the hyperbolic tangent of x
  34   34   *
  35   35   * Method :
  36   36   *      1. reduce x to non-negative:  tanhl(-x) = - tanhl(x).
  37   37   *      2.
  38   38   *        0      <  x <=  small    :  tanhl(x) := x
  39   39   *                                                -expm1l(-2x)
  40   40   *        small  <  x <=  1        :  tanhl(x) := --------------
↓ open down ↓ 60 lines elided ↑ open up ↑
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX