diff options
author | jkh <jkh@FreeBSD.org> | 1996-07-12 18:57:58 +0000 |
---|---|---|
committer | jkh <jkh@FreeBSD.org> | 1996-07-12 18:57:58 +0000 |
commit | c4d4a99d31762beef936f34571330923e9300da9 (patch) | |
tree | c116431af8e1f042b25e0f70c63c437cf7ff8d63 /lib/libI77/wref.c | |
parent | 6657f01bfd009bbf4ec0481a17712259abf8ea77 (diff) | |
download | FreeBSD-src-c4d4a99d31762beef936f34571330923e9300da9.zip FreeBSD-src-c4d4a99d31762beef936f34571330923e9300da9.tar.gz |
General -Wall warning cleanup, part I.
Submitted-By: Kent Vander Velden <graphix@iastate.edu>
Diffstat (limited to 'lib/libI77/wref.c')
-rw-r--r-- | lib/libI77/wref.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lib/libI77/wref.c b/lib/libI77/wref.c index eda9a8f..21485a4 100644 --- a/lib/libI77/wref.c +++ b/lib/libI77/wref.c @@ -15,9 +15,9 @@ #endif #ifdef KR_headers -wrt_E(p,w,d,e,len) ufloat *p; ftnlen len; +int wrt_E(p,w,d,e,len) ufloat *p; ftnlen len; #else -wrt_E(ufloat *p, int w, int d, int e, ftnlen len) +int wrt_E(ufloat *p, int w, int d, int e, ftnlen len) #endif { char buf[FMAX+EXPMAXDIGS+4], *s, *se; @@ -127,7 +127,7 @@ nogood: /* exponent field if it fits. */ #else if (!e0) { - for(s -= 2, e1 = 2; s[0] = s[1]; s++) + for(s -= 2, e1 = 2; (s[0] = s[1]); s++) #ifdef CRAY delta--; if ((delta += 4) < 0) @@ -191,9 +191,9 @@ nogood: } #ifdef KR_headers -wrt_F(p,w,d,len) ufloat *p; ftnlen len; +int wrt_F(p,w,d,len) ufloat *p; ftnlen len; #else -wrt_F(ufloat *p, int w, int d, ftnlen len) +int wrt_F(ufloat *p, int w, int d, ftnlen len) #endif { int d1, sign, n; @@ -217,7 +217,7 @@ wrt_F(ufloat *p, int w, int d, ftnlen len) #endif } - if (n = f__scale) + if ( (n = f__scale) ) if (n > 0) do x *= 10.; while(--n > 0); else @@ -267,7 +267,7 @@ wrt_F(ufloat *p, int w, int d, ftnlen len) PUT('-'); else if (f__cplus) PUT('+'); - while(n = *b++) + while( (n = *b++) ) PUT(n); while(--d1 >= 0) PUT('0'); |