aboutsummaryrefslogtreecommitdiff
path: root/gcc/f/runtime/libF77/z_abs.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/f/runtime/libF77/z_abs.c')
-rw-r--r--gcc/f/runtime/libF77/z_abs.c12
1 files changed, 0 insertions, 12 deletions
diff --git a/gcc/f/runtime/libF77/z_abs.c b/gcc/f/runtime/libF77/z_abs.c
deleted file mode 100644
index 7e67ad2957f..00000000000
--- a/gcc/f/runtime/libF77/z_abs.c
+++ /dev/null
@@ -1,12 +0,0 @@
-#include "f2c.h"
-
-#ifdef KR_headers
-double f__cabs();
-double z_abs(z) doublecomplex *z;
-#else
-double f__cabs(double, double);
-double z_abs(doublecomplex *z)
-#endif
-{
-return( f__cabs( z->r, z->i ) );
-}