* libI77/close.c (f_exit): Reset f__init so that f_clos does not
commite8e7194b011358b791b80f8fa315353d95d3d5a5
authorlaw <law@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 18 Nov 1997 16:47:23 +0000 (18 16:47 +0000)
committerlaw <law@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 18 Nov 1997 16:47:23 +0000 (18 16:47 +0000)
treed2207fd758b1e941acd733a134bab9b146b7bf1f
parent6d61a8092a1f54c063eafafa2d8ad86b343b91b4
    * libI77/close.c (f_exit): Reset f__init so that f_clos does not
        (incorrectly) think there is an I/O recursion when program is
        interrupted.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/egcs_1_00_branch@16564 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/f/runtime/ChangeLog.egcs
gcc/f/runtime/libI77/close.c