diff options
| author | Kaveh R. Ghazi <ghazi@caip.rutgers.edu> | 2002-06-01 01:53:53 +0000 |
|---|---|---|
| committer | Kaveh Ghazi <ghazi@gcc.gnu.org> | 2002-06-01 01:53:53 +0000 |
| commit | 4d85a6fea685603493f2a4dbcfd36d6fd25fbe26 (patch) | |
| tree | 693a2481f59e62982389a205d2b15b5bfa3e0b2b /libf2c/libI77/rsli.c | |
| parent | 1e730c5ca76832a10c16300f12ab0447ca1b07a1 (diff) | |
| download | gcc-4d85a6fea685603493f2a4dbcfd36d6fd25fbe26.zip gcc-4d85a6fea685603493f2a4dbcfd36d6fd25fbe26.tar.gz gcc-4d85a6fea685603493f2a4dbcfd36d6fd25fbe26.tar.bz2 | |
*: Delete KR_headers cruft.
* libF77/*: Delete KR_headers cruft.
* libI77/*: Likewise.
* libU77/*: Likewise.
From-SVN: r54132
Diffstat (limited to 'libf2c/libI77/rsli.c')
| -rw-r--r-- | libf2c/libI77/rsli.c | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/libf2c/libI77/rsli.c b/libf2c/libI77/rsli.c index baf2ba5..d083d48 100644 --- a/libf2c/libI77/rsli.c +++ b/libf2c/libI77/rsli.c @@ -24,11 +24,7 @@ static int i_getc(Void) } static -#ifdef KR_headers -int i_ungetc(ch, f) int ch; FILE *f; -#else int i_ungetc(int ch, FILE *f) -#endif { if (--f__recpos == f__svic->icirlen) return '\n'; @@ -39,11 +35,7 @@ int i_ungetc(int ch, FILE *f) } static void -#ifdef KR_headers -c_lir(a) icilist *a; -#else c_lir(icilist *a) -#endif { extern int l_eof; if(f__init != 1) f_init(); @@ -67,11 +59,7 @@ c_lir(icilist *a) } -#ifdef KR_headers -integer s_rsli(a) icilist *a; -#else integer s_rsli(icilist *a) -#endif { f__lioproc = l_read; f__lquit = 0; @@ -84,13 +72,9 @@ integer s_rsli(icilist *a) integer e_rsli(Void) { f__init = 1; return 0; } -#ifdef KR_headers -integer s_rsni(a) icilist *a; -#else extern int x_rsne(cilist*); integer s_rsni(icilist *a) -#endif { extern int nml_read; integer rv; |