mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 16:34:07 +00:00
28 lines
1011 B
C
28 lines
1011 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 <stdio.h>
|
|
#include <cpm.h>
|
|
|
|
exit(code) /***************************/
|
|
WORD code; /* Exit status */
|
|
{ /* */
|
|
_cleanup(); /* Close all (stream) files*/
|
|
_exit(code); /* return to O.S. */
|
|
} /***************************/
|