diff options
Diffstat (limited to 'contrib/libf2c/libF77/sig_die.c')
| -rw-r--r-- | contrib/libf2c/libF77/sig_die.c | 46 |
1 files changed, 19 insertions, 27 deletions
diff --git a/contrib/libf2c/libF77/sig_die.c b/contrib/libf2c/libF77/sig_die.c index bebb1e7..622462e 100644 --- a/contrib/libf2c/libF77/sig_die.c +++ b/contrib/libf2c/libF77/sig_die.c @@ -7,39 +7,31 @@ #endif #endif -#ifdef KR_headers -void sig_die(s, kill) register char *s; int kill; -#else #include <stdlib.h> -#ifdef __cplusplus -extern "C" { -#endif - extern void f_exit(void); +extern void f_exit (void); -void sig_die(register char *s, int kill) -#endif +void +sig_die (register char *s, int kill) { - /* print error message, then clear buffers */ - fprintf(stderr, "%s\n", s); + /* print error message, then clear buffers */ + fprintf (stderr, "%s\n", s); - if(kill) - { - fflush(stderr); - f_exit(); - fflush(stderr); - /* now get a core */ + if (kill) + { + fflush (stderr); + f_exit (); + fflush (stderr); + /* now get a core */ #ifdef SIGIOT - signal(SIGIOT, SIG_DFL); + signal (SIGIOT, SIG_DFL); #endif - abort(); - } - else { + abort (); + } + else + { #ifdef NO_ONEXIT - f_exit(); + f_exit (); #endif - exit(1); - } - } -#ifdef __cplusplus + exit (1); + } } -#endif |
