~ubuntu-branches/ubuntu/precise/eglibc/precise-201308281639

« back to all changes in this revision

Viewing changes to math/s_catan.c

  • Committer: Package Import Robot
  • Author(s): Matthias Klose
  • Date: 2012-02-08 01:58:09 UTC
  • mfrom: (1.5.3) (288.1.12 precise)
  • Revision ID: package-import@ubuntu.com-20120208015809-ulscst7uteq3e22z
Tags: 2.15~pre6-0ubuntu10
Merge from Debian (r5151, 2.13-26).

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
/* Return arc tangent of complex double value.
2
 
   Copyright (C) 1997 Free Software Foundation, Inc.
 
2
   Copyright (C) 1997, 2011 Free Software Foundation, Inc.
3
3
   This file is part of the GNU C Library.
4
4
   Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
5
5
 
20
20
 
21
21
#include <complex.h>
22
22
#include <math.h>
23
 
 
24
 
#include "math_private.h"
 
23
#include <math_private.h>
25
24
 
26
25
 
27
26
__complex__ double
31
30
  int rcls = fpclassify (__real__ x);
32
31
  int icls = fpclassify (__imag__ x);
33
32
 
34
 
  if (rcls <= FP_INFINITE || icls <= FP_INFINITE)
 
33
  if (__builtin_expect (rcls <= FP_INFINITE || icls <= FP_INFINITE, 0))
35
34
    {
36
35
      if (rcls == FP_INFINITE)
37
36
        {
57
56
          __imag__ res = __nan ("");
58
57
        }
59
58
    }
60
 
  else if (rcls == FP_ZERO && icls == FP_ZERO)
 
59
  else if (__builtin_expect (rcls == FP_ZERO && icls == FP_ZERO, 0))
61
60
    {
62
61
      res = x;
63
62
    }