Upload

Digital Research

CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v102a/clib/exit.c

@@ -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 "portab.h"
+
+VOID	exit(code)				/* CLEAR FUNCTION ***********/
+	WORD	code;				/* Exit status		   */
+{						/*			   */
+	_cleanup();				/* Close all (stream) files*/
+	_exit(code);				/* return to O.S.	   */
+}						/***************************/