1  /*
       2   * Public domain.
       3   *
       4   */
       5  
       6  #include <math_private.h>
       7  #include <libm-alias-finite.h>
       8  
       9  long double
      10  __ieee754_atan2l (long double y, long double x)
      11  {
      12    long double res;
      13  
      14    asm ("fpatan" : "=t" (res) : "u" (y), "0" (x) : "st(1)");
      15  
      16    return res;
      17  }
      18  libm_alias_finite (__ieee754_atan2l, __atan2l)