1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
Author: Hilmar Preuße <hille42@debian.org>
Andreas Tille <tille@debian.org>
Last-Update: 2025-10-22
Bug-Debian: https://bugs.debian.org/1074976
Description: Fix ftbfs with GCC-14/15
--- a/Web/configure
+++ b/Web/configure
@@ -614,7 +614,7 @@ cross_compiling=$ac_cv_prog_cc_cross
cat > conftest.$ac_ext <<EOF
#line 616 "configure"
#include "confdefs.h"
-main(){return(0);}
+int main(){return(0);}
EOF
if { (eval echo configure:620: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then
ac_cv_prog_cc_works=yes
--- a/Web/ftangle.c
+++ b/Web/ftangle.c
@@ -1402,7 +1402,7 @@ static outer_char last_out= '\0';
static boolean is_label= NO;
static boolean should_continue= NO;
-static continuation_line= NOT_CONTINUATION;
+static int continuation_line= NOT_CONTINUATION;
static STMT_LBL stmt_num[50];
@@ -3341,7 +3341,7 @@ char*buffer;
IN_COMMON outer_char wbprefix[MAX_FILE_NAME_LENGTH];
#if(HAVE_TEMPNAM)
-extern char*tempnam();
+/* extern char*tempnam(); */
if(!*wbprefix)
STRCPY(wbprefix,"./");
--- a/Web/ftangle.web
+++ b/Web/ftangle.web
@@ -460,7 +460,7 @@ static outer_char last_out = '\0'; // In
/* Various flags help \Fortran\ out. */
static boolean is_label = NO;
static boolean should_continue = NO;
-static continuation_line = NOT_CONTINUATION;
+static int continuation_line = NOT_CONTINUATION;
static STMT_LBL stmt_num[50]; /* Archaic; for numbering
|do|s in \Fortran. Should use \Ratfor\ instead. */
@@ -3172,7 +3172,7 @@ char *buffer;
IN_COMMON outer_char wbprefix[MAX_FILE_NAME_LENGTH];
#if(HAVE_TEMPNAM)
- extern char *tempnam();
+/* extern char *tempnam();*/
if(!*wbprefix)
STRCPY(wbprefix,"./");
--- a/Web/common.c
+++ b/Web/common.c
@@ -5729,7 +5729,7 @@ printf("]? "),fflush(stdout);
WHILE()
{
SET_COLOR(ordinary);
-gets((char*)buf);
+fgets((char *)buf, sizeof(buf), stdin);
if(STRCMP(buf,"yes")==0||STRCMP(buf,"no")==0)
break;
@@ -8351,7 +8351,7 @@ printf("\nTo enter `info FWEB' now, type
a space-separated list of hierarchal FWEB menu items,\n\
like `concepts structure'.\n\n\
Type `q' to exit info. To abort now, hit Enter: "),fflush(stdout);
-gets((char*)buf);
+fgets((char *)buf, sizeof(buf), stdin);
pmenus= buf;
}
--- a/Web/ratfor.c
+++ b/Web/ratfor.c
@@ -2059,7 +2059,7 @@ va_arg(arg_ptr,int);
static outer_char brkset[3]= "*?";
#ifndef strpbrk
-char*strpbrk();
+#include <string.h>
#endif
boolean found_abbrev;
--- a/Web/fweave.c
+++ b/Web/fweave.c
@@ -5484,7 +5484,6 @@ outer_char*ext C1("")
outer_char*buffer;
#if(HAVE_TEMPNAM)
-extern char*tempnam();
if(!*wbprefix)
STRCPY(wbprefix,"./");
--- a/Web/idxmerge.web
+++ b/Web/idxmerge.web
@@ -28,7 +28,7 @@ return strcmp(*(char **)arg1, *(char **)
@d CALLOC(n, type) (type *)calloc(n, sizeof(type))
@a
-main(int num_args, char *args[])
+int main(int num_args, char *args[])
{
char **file_name, *root_name = NULL, *out_name = NULL;
char *pg = "|pg";
|
