aboutsummaryrefslogtreecommitdiff
path: root/libf2c/libI77/rsli.c
diff options
context:
space:
mode:
Diffstat (limited to 'libf2c/libI77/rsli.c')
-rw-r--r--libf2c/libI77/rsli.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/libf2c/libI77/rsli.c b/libf2c/libI77/rsli.c
index baf2ba54873..a081cd589aa 100644
--- a/libf2c/libI77/rsli.c
+++ b/libf2c/libI77/rsli.c
@@ -46,8 +46,6 @@ c_lir(icilist *a)
#endif
{
extern int l_eof;
- if(f__init != 1) f_init();
- f__init = 3;
f__reading = 1;
f__external = 0;
f__formatted = 1;
@@ -82,7 +80,7 @@ integer s_rsli(icilist *a)
}
integer e_rsli(Void)
-{ f__init = 1; return 0; }
+{ return 0; }
#ifdef KR_headers
integer s_rsni(a) icilist *a;