diff options
Diffstat (limited to 'lib/libI77/iio.c')
| -rw-r--r-- | lib/libI77/iio.c | 17 |
1 files changed, 6 insertions, 11 deletions
diff --git a/lib/libI77/iio.c b/lib/libI77/iio.c index dff9e3f..4c8eb9d 100644 --- a/lib/libI77/iio.c +++ b/lib/libI77/iio.c @@ -6,8 +6,6 @@ char *f__icend; extern icilist *f__svic; int f__icnum; extern int f__hiwater; - -int z_getc(Void) { if(f__recpos++ < f__svic->icirlen) { @@ -17,9 +15,9 @@ z_getc(Void) return '\n'; } #ifdef KR_headers -int z_putc(c) +z_putc(c) #else -int z_putc(int c) +z_putc(int c) #endif { if(f__icptr >= f__icend) err(f__svic->icierr,110,"inwrite"); @@ -28,8 +26,6 @@ int z_putc(int c) else err(f__svic->icierr,110,"recend"); return 0; } - -int z_rnew(Void) { f__icptr = f__svic->iciunit + (++f__icnum)*f__svic->icirlen; @@ -47,9 +43,9 @@ z_endp(Void) } #ifdef KR_headers -int c_si(a) icilist *a; +c_si(a) icilist *a; #else -int c_si(icilist *a) +c_si(icilist *a) #endif { f__elist = (cilist *)a; @@ -86,7 +82,7 @@ integer s_rsfi(a) icilist *a; integer s_rsfi(icilist *a) #endif { int n; - if( (n=c_si(a)) ) return(n); + if(n=c_si(a)) return(n); f__reading=1; f__doed=rd_ed; f__doned=rd_ned; @@ -97,7 +93,6 @@ integer s_rsfi(icilist *a) return(0); } -int z_wnew(Void) { if (f__recpos < f__hiwater) { @@ -118,7 +113,7 @@ integer s_wsfi(a) icilist *a; integer s_wsfi(icilist *a) #endif { int n; - if( (n=c_si(a)) ) return(n); + if(n=c_si(a)) return(n); f__reading=0; f__doed=w_ed; f__doned=w_ned; |
