summaryrefslogtreecommitdiffstats
path: root/libf2c/libI77/wref.c
diff options
context:
space:
mode:
Diffstat (limited to 'libf2c/libI77/wref.c')
-rw-r--r--libf2c/libI77/wref.c10
1 files changed, 0 insertions, 10 deletions
diff --git a/libf2c/libI77/wref.c b/libf2c/libI77/wref.c
index a10bcaa1236..677364c48f1 100644
--- a/libf2c/libI77/wref.c
+++ b/libf2c/libI77/wref.c
@@ -4,22 +4,16 @@
#include <ctype.h>
#endif
-#ifndef KR_headers
#undef abs
#undef min
#undef max
#include <stdlib.h>
#include <string.h>
-#endif
#include "fmt.h"
#include "fp.h"
-#ifdef KR_headers
-wrt_E(p,w,d,e,len) ufloat *p; ftnlen len;
-#else
wrt_E(ufloat *p, int w, int d, int e, ftnlen len)
-#endif
{
char buf[FMAX+EXPMAXDIGS+4], *s, *se;
int d1, delta, e1, i, sign, signspace;
@@ -191,11 +185,7 @@ nogood:
return 0;
}
-#ifdef KR_headers
-wrt_F(p,w,d,len) ufloat *p; ftnlen len;
-#else
wrt_F(ufloat *p, int w, int d, ftnlen len)
-#endif
{
int d1, sign, n;
double x;
OpenPOWER on IntegriCloud