11210 libm should be cstyle(1ONBLD) clean

          --- old/usr/src/lib/libm/common/LD/atanhl.c
          +++ new/usr/src/lib/libm/common/LD/atanhl.c

   1    1  /*
   2    2   * CDDL HEADER START
   3    3   *
   4    4   * The contents of this file are subject to the terms of the
   5    5   * Common Development and Distribution License (the "License").
   6    6   * You may not use this file except in compliance with the License.
   7    7   *
   8    8   * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9    9   * or http://www.opensolaris.org/os/licensing.
  10   10   * See the License for the specific language governing permissions
  11   11   * and limitations under the License.
  12   12   *
  13   13   * When distributing Covered Code, include this CDDL HEADER in each
  14   14   * file and include the License file at usr/src/OPENSOLARIS.LICENSE.

  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 __atanhl = atanhl
  31   32  
  32   33  #include "libm.h"
  33   34  
  34      -#define GENERIC long double
  35      -#define ATANH   atanhl
       35 +#define GENERIC         long double
       36 +#define ATANH           atanhl
  36   37  
  37      -/* ATANH(x)
       38 +/* BEGIN CSTYLED */
       39 +/*
       40 + * ATANH(x)
  38   41   *                  1              2x                          x
  39   42   *      ATANH(x) = --- * LOG(1 + -------) = 0.5 * LOG1P(2 * --------)
  40   43   *                  2             1 - x                      1 - x
  41   44   * Note: to guarantee ATANH(-x) = -ATANH(x), we use
  42   45   *                 sign(x)             |x|
  43   46   *      ATANH(x) = ------- * LOG1P(2*-------).
  44   47   *                    2              1 - |x|
  45   48   *
  46   49   * Special cases:
  47   50   *      ATANH(x) is NaN if |x| > 1 with signal;
  48   51   *      ATANH(NaN) is that NaN with no signal;
  49   52   *      ATANH(+-1) is +-INF with signal.
  50   53   *
  51   54   */
       55 +/* END CSTYLED */
  52   56  
  53      -#define FABS    fabsl
  54      -#define LOG1P   log1pl
  55      -#define COPYSIGN        copysignl
  56      -
       57 +#define FABS            fabsl
       58 +#define LOG1P           log1pl
       59 +#define COPYSIGN        copysignl
  57   60  
  58      -extern GENERIC  FABS(),LOG1P(),COPYSIGN();
       61 +extern GENERIC FABS(), LOG1P(), COPYSIGN();
  59   62  
  60      -static GENERIC
  61      -zero    = (GENERIC) 0.0,
  62      -half    = (GENERIC) 0.5,
  63      -one     = (GENERIC) 1.0;
       63 +static GENERIC zero = (GENERIC)0.0, half = (GENERIC)0.5, one = (GENERIC)1.0;
  64   64  
  65      -GENERIC ATANH(x)
  66      -GENERIC x;
       65 +GENERIC
       66 +ATANH(GENERIC x)
  67   67  {
  68   68          GENERIC t;
       69 +
  69   70          t = FABS(x);
  70      -        if (t == one) return x/zero;
  71      -        t = t/(one-t);
  72      -        return COPYSIGN(half,x)*LOG1P(t+t);
       71 +
       72 +        if (t == one)
       73 +                return (x / zero);
       74 +
       75 +        t = t / (one - t);
       76 +        return (COPYSIGN(half, x) * LOG1P(t + t));
  73   77  }
    

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX