mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-24 00:44:23 +00:00
Upload
Digital Research
This commit is contained in:
27
CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v102/clib/exit.c
Normal file
27
CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v102/clib/exit.c
Normal file
@@ -0,0 +1,27 @@
|
||||
/****************************************************************************/
|
||||
/* */
|
||||
/* 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. */
|
||||
} /***************************/
|
||||
Reference in New Issue
Block a user