Move *-*-gnu* pattern below *-*-linux*.
[official-gcc.git] / libf2c / libF77 / r_atn2.c
blob9347e1f13a9af8675883e4ba0ff7cb5de6f3ee83
1 #include "f2c.h"
3 #ifdef KR_headers
4 double atan2();
5 double r_atn2(x,y) real *x, *y;
6 #else
7 #undef abs
8 #include <math.h>
9 double r_atn2(real *x, real *y)
10 #endif
12 return( atan2(*x,*y) );