* function.c (purge_addressof): Use free_INSN_LIST_node instead of
[official-gcc.git] / libf2c / libF77 / r_asin.c
blobb8c73c786afa1a77af5acafd01582ba291d1bdd9
1 #include "f2c.h"
3 #undef abs
4 #include <math.h>
5 double
6 r_asin (real * x)
8 return (asin (*x));