summaryrefslogtreecommitdiffstats
path: root/libf2c/libU77/alarm_.c
diff options
context:
space:
mode:
Diffstat (limited to 'libf2c/libU77/alarm_.c')
-rw-r--r--libf2c/libU77/alarm_.c14
1 files changed, 0 insertions, 14 deletions
diff --git a/libf2c/libU77/alarm_.c b/libf2c/libU77/alarm_.c
index e7f9c2ddcc4..fd3842a425a 100644
--- a/libf2c/libU77/alarm_.c
+++ b/libf2c/libU77/alarm_.c
@@ -29,32 +29,18 @@ Boston, MA 02111-1307, USA. */
#ifndef RETSIGTYPE
/* we shouldn't rely on this... */
-#ifdef KR_headers
-#define RETSIGTYPE int
-#else
#define RETSIGTYPE void
#endif
-#endif
typedef RETSIGTYPE (*sig_type)();
-#ifdef KR_headers
-extern sig_type signal();
-#else
#include <signal.h>
typedef int (*sig_proc)(int);
-#endif
#ifndef SIG_ERR
#define SIG_ERR ((sig_type) -1)
#endif
-#ifdef KR_headers
-integer G77_alarm_0 (seconds, proc)
- integer *seconds;
- sig_type proc;
-#else
integer G77_alarm_0 (integer *seconds, sig_proc proc)
-#endif
{
int status;
#if defined (HAVE_ALARM) && defined (SIGALRM)
OpenPOWER on IntegriCloud