Subversion Repositories Kolibri OS

Rev

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

  1. /*
  2.  * Written by J.T. Conklin <jtc@netbsd.org>.
  3.  * Public domain.
  4.  *
  5.  * Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>.
  6.  */
  7.  
  8. #include <math.h>
  9.  
  10. long double
  11. atan2l (long double y, long double x)
  12. {
  13.   long double res;
  14.   asm ("fpatan" : "=t" (res) : "u" (y), "0" (x) : "st(1)");
  15.   return res;
  16. }
  17.