minnie.tuhs.org/2014.11.minnie.tuhs.org.tar/minnie.tuhs.org/UnixArchive/PDP-11/Trees/V6/usr/source/iolib/cexit.c

Text File | 1975-05-14 | 136 b | 9 lines

cexit (rcode)
{
/* closes all files and exits */
int i;
for (i = 0; i < 10; i++)
    cclose(i);
exit(rcode);    /* rcode courtesy of sny */
}