diff options
Diffstat (limited to 'lib/libI77/open.c')
-rw-r--r-- | lib/libI77/open.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/libI77/open.c b/lib/libI77/open.c index 15d887a..75386b9 100644 --- a/lib/libI77/open.c +++ b/lib/libI77/open.c @@ -83,6 +83,8 @@ integer f_open(olist *a) #endif if(a->ounit>=MXUNIT || a->ounit<0) err(a->oerr,101,"open") + if (!f__init) + f_init(); f__curunit = b = &f__units[a->ounit]; if(b->ufd) { if(a->ofnm==0) |