diff options
author | David E. O'Brien <obrien@FreeBSD.org> | 1999-09-18 10:51:31 +0000 |
---|---|---|
committer | David E. O'Brien <obrien@FreeBSD.org> | 1999-09-18 10:51:31 +0000 |
commit | c1f999a45c30f40a3964639c48761ad29a52c612 (patch) | |
tree | 0938eb35cebcf917f447463078144fc4832576c6 /contrib/libf2c/libF77/d_tan.c | |
parent | 2a266d02ba4304af542da2cc521ecc0edc1c9706 (diff) | |
download | src-c1f999a45c30f40a3964639c48761ad29a52c612.tar.gz src-c1f999a45c30f40a3964639c48761ad29a52c612.zip |
Virgin import of EGCS 1.1.2's libf2c
Notes
Notes:
svn path=/vendor/gcc/dist/; revision=51363
Diffstat (limited to 'contrib/libf2c/libF77/d_tan.c')
-rw-r--r-- | contrib/libf2c/libF77/d_tan.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/contrib/libf2c/libF77/d_tan.c b/contrib/libf2c/libF77/d_tan.c new file mode 100644 index 000000000000..af94a053223c --- /dev/null +++ b/contrib/libf2c/libF77/d_tan.c @@ -0,0 +1,13 @@ +#include "f2c.h" + +#ifdef KR_headers +double tan(); +double d_tan(x) doublereal *x; +#else +#undef abs +#include <math.h> +double d_tan(doublereal *x) +#endif +{ +return( tan(*x) ); +} |