Print this page
11210 libm should be cstyle(1ONBLD) clean

Split Close
Expand all
Collapse all
          --- old/usr/src/lib/libm/common/C/tan.c
          +++ new/usr/src/lib/libm/common/C/tan.c
↓ open down ↓ 14 lines elided ↑ open up ↑
  15   15   * If applicable, add the following below this CDDL HEADER, with the
  16   16   * fields enclosed by brackets "[]" replaced with your own identifying
  17   17   * information: Portions Copyright [yyyy] [name of copyright owner]
  18   18   *
  19   19   * CDDL HEADER END
  20   20   */
  21   21  
  22   22  /*
  23   23   * Copyright 2011 Nexenta Systems, Inc.  All rights reserved.
  24   24   */
       25 +
  25   26  /*
  26   27   * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
  27   28   * Use is subject to license terms.
  28   29   */
  29   30  
  30   31  #pragma weak __tan = tan
  31   32  
  32      -/* INDENT OFF */
       33 +
  33   34  /*
  34   35   * tan(x)
  35   36   * Table look-up algorithm by K.C. Ng, November, 1989.
  36   37   *
  37   38   * kernel function:
  38   39   *      __k_tan         ... tangent function on [-pi/4,pi/4]
  39   40   *      __rem_pio2      ... argument reduction routine
  40   41   */
  41      -/* INDENT ON */
  42   42  
  43   43  #include "libm.h"
  44   44  #include "libm_protos.h"
  45   45  #include <math.h>
  46   46  
  47   47  double
  48      -tan(double x) {
       48 +tan(double x)
       49 +{
  49   50          double y[2], z = 0.0;
  50   51          int n, ix;
  51   52  
  52   53          /* high word of x */
  53      -        ix = ((int *) &x)[HIWORD];
       54 +        ix = ((int *)&x)[HIWORD];
  54   55  
  55   56          /* |x| ~< pi/4 */
  56   57          ix &= 0x7fffffff;
  57      -        if (ix <= 0x3fe921fb)
  58      -                return (__k_tan(x, z, 0));
  59   58  
       59 +        if (ix <= 0x3fe921fb) {
       60 +                return (__k_tan(x, z, 0));
       61 +        }
  60   62          /* tan(Inf or NaN) is NaN */
  61   63          else if (ix >= 0x7ff00000) {
  62   64  #if defined(FPADD_TRAPS_INCOMPLETE_ON_NAN)
  63   65                  return (ix >= 0x7ff80000 ? x : x - x);  /* NaN */
  64   66                  /* assumes sparc-like QNaN */
  65   67  #else
  66   68                  return (x - x);                         /* NaN */
  67   69  #endif
  68   70          }
  69      -
  70   71          /* argument reduction needed */
  71   72          else {
  72   73                  n = __rem_pio2(x, y);
  73   74                  return (__k_tan(y[0], y[1], n & 1));
  74   75          }
  75   76  }
    
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX