14 #if defined (MSDOS) && !defined (GO32)
17 extern int unlink (const char *);
27 f__fatal (131, "I/O recursion");
28 if (a->cunit >= MXUNIT)
30 b = &f__units[a->cunit];
58 /*SYSDEP*/ free (b->ufnm);
74 return; /* Not initialized, so no open units. */
75 /* I/O no longer in progress. If, during an I/O operation (such
76 as waiting for the user to enter a line), there is an
77 interrupt (such as ^C to stop the program on a UNIX system),
78 f_exit() is called, but there is no longer any I/O in
79 progress. Without turning off this flag, f_clos() would
80 think that there is an I/O recursion in this circumstance. */
86 for (i = 0; i < MXUNIT; i++)
97 for (i = 0; i < MXUNIT; i++)
98 if (f__units[i].ufd != NULL && f__units[i].uwrt)
99 fflush (f__units[i].ufd);