diff options
Diffstat (limited to 'libf2c/libI77/wsfe.c')
| -rw-r--r-- | libf2c/libI77/wsfe.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libf2c/libI77/wsfe.c b/libf2c/libI77/wsfe.c index b55b142..babfb34 100644 --- a/libf2c/libI77/wsfe.c +++ b/libf2c/libI77/wsfe.c @@ -57,6 +57,7 @@ integer s_wsfe(cilist *a) /*start*/ f__nonl = 0; f__scale=0; f__fmtbuf=a->cifmt; + f__curunit = &f__units[a->ciunit]; f__cf=f__curunit->ufd; if(pars_f(f__fmtbuf)<0) err(a->cierr,100,"startio"); f__putn= x_putc; |