Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1906 serge 1 
/*
2 
 * Written by J.T. Conklin .
3 
 * Public domain.
4 
 *
5 
 * Adapted for `long double' by Ulrich Drepper .
6 
 */
7 
 
8 
#include
9 
 
10 
long double
11 
atanl (long double x)
12 
{
13 
  long double res;
14 
 
15 
  asm ("fld1\n\t"
16 
       "fpatan"
17 
       : "=t" (res) : "0" (x));
18 
  return res;
19 
}