aboutsummaryrefslogtreecommitdiff
path: root/libf2c/libF77/setsig.c
diff options
context:
space:
mode:
Diffstat (limited to 'libf2c/libF77/setsig.c')
-rw-r--r--libf2c/libF77/setsig.c86
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
-}