Files
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

28 lines
967 B
C

/***************************************************************************
*
* E x i t F u n c t i o n
* -------------------------
* Copyright 1982 by Digital Research Inc. All rights reserved.
*
* The exit function is called from anywhere to pass control back to
* the CCP from the executing C program.
* Note that the stream files are closed via '_cleanup()'.
*
* Calling Sequence:
*
* exit(code);
*
* Where:
* code Is the exit status (ignored)
*
****************************************************************************/
#include "portab.h"
VOID exit(code) /* CLEAR FUNCTION ***********/
WORD code; /* Exit status */
{ /* */
_cleanup(); /* Close all (stream) files*/
_exit(code); /* return to O.S. */
} /***************************/