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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
|
$NetBSD: patch-src_file_c,v 1.1 2012/05/10 20:53:30 dholland Exp $
- use standard headers
- don't use implicit int
- const correctness required by existing const declarations
- silence initialize warning seen with gcc 4.1
--- src/file.c~ 2012-05-10 19:25:36.000000000 +0000
+++ src/file.c
@@ -7,6 +7,7 @@
*/
#include <stdio.h>
+#include <unistd.h>
#include "estruct.h"
#include "eproto.h"
#include "edef.h"
@@ -23,7 +24,7 @@
* "read a file into the current buffer" code.
* Bound to "C-X C-R".
*/
-PASCAL NEAR fileread(f, n)
+int PASCAL NEAR fileread(f, n)
int f, n; /* defualt and numeric arguments (unused) */
@@ -46,7 +47,7 @@ int f, n; /* defualt and numeric argumen
* "insert a file into the current buffer" code.
* Bound to "C-X C-I".
*/
-PASCAL NEAR insfile(f, n)
+int PASCAL NEAR insfile(f, n)
int f,n; /* prefix flag and argument */
@@ -55,6 +56,9 @@ int f,n; /* prefix flag and argument */
char *fname; /* file name */
LINE *curline;
+ /* required by gcc 4.1 */
+ curline = NULL;
+
if (restflag) /* don't allow this command if restricted */
return(resterr());
if (curbp->b_mode&MDVIEW) /* don't allow this command if */
@@ -89,7 +93,7 @@ int f,n; /* prefix flag and argument */
* text, and switch to the new buffer.
* Bound to C-X C-F.
*/
-PASCAL NEAR filefind(f, n)
+int PASCAL NEAR filefind(f, n)
int f,n; /* prefix flag and argument */
@@ -105,7 +109,7 @@ int f,n; /* prefix flag and argument */
return(getfile(fname, TRUE));
}
-PASCAL NEAR viewfile(f, n) /* visit a file in VIEW mode */
+int PASCAL NEAR viewfile(f, n) /* visit a file in VIEW mode */
int f,n; /* prefix flag and argument */
@@ -128,7 +132,7 @@ int f,n; /* prefix flag and argument */
}
#if CRYPT
-PASCAL NEAR resetkey() /* reset the encryption key if needed */
+int PASCAL NEAR resetkey() /* reset the encryption key if needed */
{
register int s; /* return status */
@@ -161,9 +165,9 @@ PASCAL NEAR resetkey() /* reset the encr
}
#endif
-PASCAL NEAR getfile(fname, lockfl)
+int PASCAL NEAR getfile(fname, lockfl)
-char fname[]; /* file name to find */
+CONST char fname[]; /* file name to find */
int lockfl; /* check the file for locks? */
{
@@ -252,9 +256,9 @@ int lockfl; /* check the file for locks
and before it is read.
*/
-PASCAL NEAR readin(fname, lockfl)
+int PASCAL NEAR readin(fname, lockfl)
-char fname[]; /* name of file to read */
+CONST char fname[]; /* name of file to read */
int lockfl; /* check for file locks? */
{
@@ -386,15 +390,15 @@ out:
* Returns a pointer into fname indicating the end of the file path; i.e.,
* 1 character BEYOND the path name.
*/
-char *PASCAL NEAR makename(bname, fname)
+CONST char *PASCAL NEAR makename(bname, fname)
char *bname;
-char *fname;
+CONST char *fname;
{
- register char *cp1;
+ register CONST char *cp1;
register char *cp2;
- register char *pathp;
+ register CONST char *pathp;
#if AOSVS | MV_UX
resolve_full_pathname(fname, fname);
@@ -480,7 +484,7 @@ char *name; /* name to check on */
* and ^X^A for appending.
*/
-PASCAL NEAR filewrite(f, n)
+int PASCAL NEAR filewrite(f, n)
int f, n; /* emacs arguments */
@@ -503,7 +507,7 @@ int f, n; /* emacs arguments */
return(s);
}
-PASCAL NEAR fileapp(f, n) /* append file */
+int PASCAL NEAR fileapp(f, n) /* append file */
int f, n; /* emacs arguments */
@@ -532,7 +536,7 @@ int f, n; /* emacs arguments */
* name for the buffer. Bound to "C-X C-S". May
* get called by "C-Z".
*/
-PASCAL NEAR filesave(f, n)
+int PASCAL NEAR filesave(f, n)
int f,n; /* prefix flag and argument */
@@ -588,7 +592,7 @@ int f,n; /* prefix flag and argument */
* a user specifyable routine (in $writehook) can be run.
*/
-PASCAL NEAR writeout(fn, mode)
+int PASCAL NEAR writeout(fn, mode)
char *fn; /* name of file to write current buffer to */
char *mode; /* mode to open file (w = write a = append) */
@@ -719,7 +723,7 @@ char *mode; /* mode to open file (w = wr
* prompt if you wish.
*/
-PASCAL NEAR filename(f, n)
+int PASCAL NEAR filename(f, n)
int f,n; /* prefix flag and argument */
@@ -747,7 +751,7 @@ int f,n; /* prefix flag and argument */
* buffer, Called by insert file command. Return the final
* status of the read.
*/
-PASCAL NEAR ifile(fname)
+int PASCAL NEAR ifile(fname)
char fname[];
{
register LINE *lp0;
@@ -859,7 +863,7 @@ out:
names of all the files in a given directory
*/
-PASCAL NEAR showfiles(f, n)
+int PASCAL NEAR showfiles(f, n)
int f,n; /* prefix flag and argument */
|