From 637df35f96d8023056369fcf2c9943419f1a1b74 Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Wed, 12 Jul 1995 19:47:25 +0000 Subject: Ada95, gnat, go32 --- c/src/lib/libbsp/i386/go32/startup/exit.c | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) create mode 100644 c/src/lib/libbsp/i386/go32/startup/exit.c (limited to 'c/src/lib/libbsp/i386/go32/startup/exit.c') diff --git a/c/src/lib/libbsp/i386/go32/startup/exit.c b/c/src/lib/libbsp/i386/go32/startup/exit.c new file mode 100644 index 0000000000..a7c81df0c7 --- /dev/null +++ b/c/src/lib/libbsp/i386/go32/startup/exit.c @@ -0,0 +1,30 @@ +/* + * exit + * + * This routine returns control to DOS. + * + * COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994. + * On-Line Applications Research Corporation (OAR). + * All rights assigned to U.S. Government, 1994. + * + * This material may be reproduced by or for the U.S. Government pursuant + * to the copyright license under the clause at DFARS 252.227-7013. This + * notice must appear in all copies of this file and its derivatives. + * + * $Id$ + */ + +#include +#include +#include +#include + +#if 0 +/* Prefer to pick up _exit() in djgcc */ +void _exit( ) +{ + Io_cleanup(); + bsp_cleanup(); +} +#endif + -- cgit v1.2.3