diff options
Diffstat (limited to 'libf2c/libF77/setsig.c')
-rw-r--r-- | libf2c/libF77/setsig.c | 86 |
1 files changed, 0 insertions, 86 deletions
diff --git a/libf2c/libF77/setsig.c b/libf2c/libF77/setsig.c deleted file mode 100644 index 96826be94fd..00000000000 --- a/libf2c/libF77/setsig.c +++ /dev/null @@ -1,86 +0,0 @@ -/* Set up the signal behavior. */ - -#include <stdio.h> -#include "signal1.h" - -#ifndef SIGIOT -#ifdef SIGABRT -#define SIGIOT SIGABRT -#endif -#endif - -#include <stdlib.h> - -extern void sig_die (char *, int); - -static void -sigfdie (Sigarg) -{ - Use_Sigarg; - sig_die ("Floating Exception", 1); -} - - -static void -sigidie (Sigarg) -{ - Use_Sigarg; - sig_die ("IOT Trap", 1); -} - -#ifdef SIGQUIT -static void -sigqdie (Sigarg) -{ - Use_Sigarg; - sig_die ("Quit signal", 1); -} -#endif - - -static void -sigindie (Sigarg) -{ - Use_Sigarg; - sig_die ("Interrupt", 0); -} - -static void -sigtdie (Sigarg) -{ - Use_Sigarg; - sig_die ("Killed", 0); -} - -#ifdef SIGTRAP -static void -sigtrdie (Sigarg) -{ - Use_Sigarg; - sig_die ("Trace trap", 1); -} -#endif - - -void -f_setsig () -{ - signal1 (SIGFPE, sigfdie); /* ignore underflow, enable overflow */ -#ifdef SIGIOT - signal1 (SIGIOT, sigidie); -#endif -#ifdef SIGTRAP - signal1 (SIGTRAP, sigtrdie); -#endif -#ifdef SIGQUIT - if (signal1 (SIGQUIT, sigqdie) == SIG_IGN) - signal1 (SIGQUIT, SIG_IGN); -#endif - if (signal1 (SIGINT, sigindie) == SIG_IGN) - signal1 (SIGINT, SIG_IGN); - signal1 (SIGTERM, sigtdie); - -#ifdef pdp11 - ldfps (01200); /* detect overflow as an exception */ -#endif -} |