signal_.c (G77_signal_0): Make return type sig_pf as well.

        * libF77/signal_.c (G77_signal_0): Make return type sig_pf as well.
        * libI77/fio.h: Include <string.h> if STDC_HEADERS.
        * libU77/chmod_.c: Likewise.

From-SVN: r15911

diff --git a/gcc/f/runtime/libF77/signal_.c b/gcc/f/runtime/libF77/signal_.c
index 1ac81391aeff5e3c5a8bce3b5e59d35e968dd6f1..2e1af9d4ae0193acec52643d1e2b4ad95dd947b1 100644 (file)
--- a/gcc/f/runtime/libF77/signal_.c
+++ b/gcc/f/runtime/libF77/signal_.c
@@ -2,13 +2,13 @@
 #include "signal1.h"
 
 #ifdef KR_headers
-ftnint G77_signal_0 (sigp, proc) integer *sigp; sig_pf proc;
+sig_pf G77_signal_0 (sigp, proc) integer *sigp; sig_pf proc;
 #else
-ftnint G77_signal_0 (integer *sigp, sig_pf proc)
+sig_pf G77_signal_0 (integer *sigp, sig_pf proc)
 #endif
 {
        int sig;
        sig = (int)*sigp;
 
-       return (ftnint)signal(sig, proc);
+       return signal(sig, proc);
        }

diff --git a/gcc/f/runtime/libI77/fio.h b/gcc/f/runtime/libI77/fio.h
index 769d360a6263cfe3be53727e511fcf01e133012c..e9e3b3914077e3b7aea456d1597fd5023cadabdc 100644 (file)
--- a/gcc/f/runtime/libI77/fio.h
+++ b/gcc/f/runtime/libI77/fio.h
@@ -4,6 +4,9 @@
 /* ANSI C */
 #include <stddef.h>
 #endif
+#ifdef STDC_HEADERS
+#include <string.h>
+#endif
 
 #ifndef SEEK_SET
 #define SEEK_SET 0

diff --git a/gcc/f/runtime/libU77/chmod_.c b/gcc/f/runtime/libU77/chmod_.c
index 7ca05b7604d0608fb33699dece96c40dff9531cf..d482d9ed8284d6a66a32d1fea3789f40a2d1b821 100644 (file)
--- a/gcc/f/runtime/libU77/chmod_.c
+++ b/gcc/f/runtime/libU77/chmod_.c
@@ -31,6 +31,9 @@ Boston, MA 02111-1307, USA.  */
 #else
 #  include <stdio.h>
 #endif
+#if STDC_HEADERS
+#  include <string.h>
+#endif
 
 #include "f2c.h"