diff options
Diffstat (limited to 'libf2c/libI77/ilnw.c')
-rw-r--r-- | libf2c/libI77/ilnw.c | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/libf2c/libI77/ilnw.c b/libf2c/libI77/ilnw.c index abc64099d31..aff38315344 100644 --- a/libf2c/libI77/ilnw.c +++ b/libf2c/libI77/ilnw.c @@ -51,8 +51,6 @@ s_wsni(icilist *a) { cilist ca; - if(f__init != 1) f_init(); - f__init = 3; c_liw(a); ca.cifmt = a->icifmt; x_wsne(&ca); @@ -67,8 +65,6 @@ s_wsli(a) icilist *a; s_wsli(icilist *a) #endif { - if(f__init != 1) f_init(); - f__init = 3; f__lioproc = l_write; c_liw(a); return(0); @@ -76,7 +72,6 @@ s_wsli(icilist *a) integer e_wsli(Void) { - f__init = 1; z_wSL(); return(0); } |