| /* Copyright (C) 1991,93,1995-1998,2001,02,2009 Free Software Foundation, Inc. | 
 |    This file is part of the GNU C Library. | 
 |  | 
 |    The GNU C Library is free software; you can redistribute it and/or | 
 |    modify it under the terms of the GNU Lesser General Public | 
 |    License as published by the Free Software Foundation; either | 
 |    version 2.1 of the License, or (at your option) any later version. | 
 |  | 
 |    The GNU C Library is distributed in the hope that it will be useful, | 
 |    but WITHOUT ANY WARRANTY; without even the implied warranty of | 
 |    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU | 
 |    Lesser General Public License for more details. | 
 |  | 
 |    You should have received a copy of the GNU Lesser General Public | 
 |    License along with the GNU C Library; if not, write to the Free | 
 |    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | 
 |    02111-1307 USA.  */ | 
 |  | 
 | #include <bits/libc-lock.h> | 
 | #include <signal.h> | 
 | #include <stdio.h> | 
 | #include <stdlib.h> | 
 | #include <string.h> | 
 | #include <unistd.h> | 
 |  | 
 | /* AKAROS: grossly limited version of abort, so we at least get a non-zero exit | 
 |  * code.  Previously, the program seemed to exit properly (unlike on Linux). */ | 
 |  | 
 | /* Try to get a machine dependent instruction which will make the | 
 |    program crash.  This is used in case everything else fails.  */ | 
 | #include <abort-instr.h> | 
 | #ifndef ABORT_INSTRUCTION | 
 | /* No such instruction is available.  */ | 
 | # define ABORT_INSTRUCTION | 
 | #endif | 
 |  | 
 | #ifdef USE_IN_LIBIO | 
 | # include <libio/libioP.h> | 
 | # define fflush(s) _IO_flush_all_lockp (0) | 
 | #endif | 
 |  | 
 | /* Exported variable to locate abort message in core files etc.  */ | 
 | struct abort_msg_s *__abort_msg __attribute__ ((nocommon)); | 
 | libc_hidden_def (__abort_msg) | 
 |  | 
 |  | 
 | void | 
 | abort (void) | 
 | { | 
 |       _exit (127); | 
 |  | 
 |   /* If even this fails try to use the provided instruction to crash | 
 |      or otherwise make sure we never return.  */ | 
 |   while (1) | 
 |     /* Try for ever and ever.  */ | 
 |     ABORT_INSTRUCTION; | 
 | } | 
 | libc_hidden_def (abort) |