aboutsummaryrefslogtreecommitdiffstats
path: root/lib-src
diff options
context:
space:
mode:
authorMiles Bader2004-06-28 07:56:49 +0000
committerMiles Bader2004-06-28 07:56:49 +0000
commit327719ee8a3fcdb36ed6acaf6d8cb5fbdf0bd801 (patch)
tree21de188e13b5e41a79bb50040933072ae0235217 /lib-src
parent852f73b7fa7b71910282eacb6263b3ecfd4ee783 (diff)
parent376de73927383d6062483db10b8a82448505f52b (diff)
downloademacs-327719ee8a3fcdb36ed6acaf6d8cb5fbdf0bd801.tar.gz
emacs-327719ee8a3fcdb36ed6acaf6d8cb5fbdf0bd801.zip
Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-15
Merge from emacs--cvs-trunk--0 Patches applied: * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-218 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-220 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-221 Restore deleted tagline in etc/TUTORIAL.ru * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-222 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-228 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-229 Remove TeX output files from the archive * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-230 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-247 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-248 src/lisp.h (CYCLE_CHECK): Macro moved from xfaces.c * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-249 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-256 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-258 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-263 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-264 Update from CVS: lispref/display.texi: emacs -> Emacs. * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-265 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-274 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-275 Update from CVS: man/makefile.w32-in: Revert last change * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-276 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-295 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-296 Allow restarting an existing debugger session that's exited * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-297 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-299 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-300 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-327 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-328 Update from CVS: src/.gdbinit (xsymbol): Fix last change. * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-329 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-344 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-345 Tweak source regexps so that building in place won't cause problems * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-346 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-351 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-352 Update from CVS: lisp/flymake.el: New file. * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-353 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-361 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-362 Support " [...]" style defaults in minibuffer-electric-default-mode * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-363 (read-number): Use canonical format for default in prompt. * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-364 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-367 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-368 Improve display-supports-face-attributes-p on non-ttys * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-369 Rewrite face-differs-from-default-p * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-370 Move `display-supports-face-attributes-p' entirely into C code * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-371 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-372 Simplify face-differs-from-default-p; don't consider :stipple. * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-373 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-374 (tty_supports_face_attributes_p): Ensure attributes differ from default * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-375 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-376 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-377 (Fdisplay_supports_face_attributes_p): Work around bootstrapping problem * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-378 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-380 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-381 Face merging cleanups * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-382 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-384 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-385 src/xfaces.c (push_named_merge_point): Return 0 if a cycle is detected * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-386 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-395 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-396 Tweak arch tagging to make build/install-in-place less annoying * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-397 Work around vc-arch problems when building eshell * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-398 Tweak permissions * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-399 Tweak directory permissions * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-400 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-401 More build-in-place tweaking of arch tagging * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-402 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-403 Yet more build-in-place tweaking of arch tagging * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-404 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-409 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-410 Make sure image types are initialized for lookup too * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-411 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-416 Update from CVS
Diffstat (limited to 'lib-src')
-rw-r--r--lib-src/.arch-inventory10
-rw-r--r--lib-src/ChangeLog56
-rw-r--r--lib-src/Makefile.in7
-rw-r--r--lib-src/b2m.c21
-rw-r--r--lib-src/cvtmail.c8
-rw-r--r--lib-src/ebrowse.c17
-rw-r--r--lib-src/emacsclient.c27
-rw-r--r--lib-src/etags.c29
-rw-r--r--lib-src/fakemail.c8
-rw-r--r--lib-src/hexl.c6
-rw-r--r--lib-src/make-docfile.c20
-rw-r--r--lib-src/makefile.nt417
-rw-r--r--lib-src/makefile.w32-in17
-rw-r--r--lib-src/movemail.c40
-rw-r--r--lib-src/profile.c8
-rwxr-xr-xlib-src/rcs2log49
-rw-r--r--lib-src/sorted-doc.c6
-rw-r--r--lib-src/test-distrib.c13
-rw-r--r--lib-src/update-game-score.c14
-rw-r--r--lib-src/yow.c10
20 files changed, 231 insertions, 552 deletions
diff --git a/lib-src/.arch-inventory b/lib-src/.arch-inventory
new file mode 100644
index 00000000000..0e0621a8dc3
--- /dev/null
+++ b/lib-src/.arch-inventory
@@ -0,0 +1,10 @@
1# Ignore binaries
2backup ^(test-distrib|make-docfile|profile|digest-doc|movemail|cvtmail|fakemail|yow|emacsserver|hexl|update-game-score|etags|ctags|emacsclient|b2m|ebrowse)$
3
4# Building actually makes a copy/link of the source file
5precious ^(ctags\.c)$
6
7# Windows generates this
8backup ^(DOC)$
9
10# arch-tag: da33b3d6-170d-4fe5-9eb8-ed2753bc9b4f
diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog
index 75b3be839e1..9f3fcc13371 100644
--- a/lib-src/ChangeLog
+++ b/lib-src/ChangeLog
@@ -1,3 +1,59 @@
12004-06-01 Juanma Barranquero <lektu@terra.es>
2
3 * makefile.w32-in (obj): Add image.c.
4
52004-05-10 Thien-Thi Nguyen <ttn@gnu.org>
6
7 * test-distrib.c (main): For failing cases, exit with
8 `EXIT_FAILURE'.
9
102004-05-08 Jason Rumney <jasonr@gnu.org>
11
12 * makefile.w32-in (lisp1, lisp2): Split lisp to avoid long
13 command-lines.
14
152004-05-08 Thien-Thi Nguyen <ttn@gnu.org>
16
17 * cvtmail.c: Throughout, replace 0 destined for `exit' arg
18 with `EXIT_SUCCESS'. Likewise, replace 1 with `EXIT_FAILURE'.
19 (main): Use `EXIT_SUCCESS' or `EXIT_FAILURE' for return value.
20
21 * ebrowse.c, emacsclient.c, fakemail.c, hexl.c,
22 * make-docfile.c, movemail.c, profile.c, sorted-doc.c,
23 * test-distrib.c, update-game-score.c, yow.c: Likewise.
24
252004-05-08 Thien-Thi Nguyen <ttn@gnu.org>
26
27 * Makefile.in (emacsclient${EXEEXT}): Use makefile var `version'.
28
292004-05-07 Thien-Thi Nguyen <ttn@gnu.org>
30
31 * b2m.c (GOOD, BAD): Delete macros. Throughout,
32 replace w/ `EXIT_SUCCESS' and `EXIT_FAILURE', respectively.
33 (main): Use `EXIT_SUCCESS' or `EXIT_FAILURE' for return value.
34
35 * etags.c: Likewise.
36
372004-05-03 Jason Rumney <jasonr@gnu.org>
38
39 * makefile.nt: Remove.
40
412004-04-26 Eli Zaretskii <eliz@gnu.org>
42
43 * make-docfile.c (IS_DIRECTORY_SEP): New macro.
44 (put_filename): Remove unused variable len. Use IS_DIRECTORY_SEP
45 instead of a literal '/'.
46
472004-04-23 Juanma Barranquero <lektu@terra.es>
48
49 * makefile.w32-in: Add "-*- makefile -*-" mode tag.
50
512004-04-17 Paul Eggert <eggert@gnu.org>
52
53 * rcs2log (Help): Clarify wording of the usage message.
54 Problem reported by Alan Mackenzie in
55 <http://mail.gnu.org/archive/html/bug-gnu-emacs/2004-04/msg00188.html>.
56
12004-04-07 Stefan Monnier <monnier@iro.umontreal.ca> 572004-04-07 Stefan Monnier <monnier@iro.umontreal.ca>
2 58
3 * make-docfile.c (xmalloc): Fix return type. 59 * make-docfile.c (xmalloc): Fix return type.
diff --git a/lib-src/Makefile.in b/lib-src/Makefile.in
index 7868364148a..1d8c5e6c9ba 100644
--- a/lib-src/Makefile.in
+++ b/lib-src/Makefile.in
@@ -1,5 +1,5 @@
1# Makefile for lib-src subdirectory in GNU Emacs. 1# Makefile for lib-src subdirectory in GNU Emacs.
2# Copyright (C) 1985, 1987, 1988, 1993, 1994, 2002, 2003 2# Copyright (C) 1985, 1987, 1988, 1993, 1994, 2002, 2003, 2004
3# Free Software Foundation, Inc. 3# Free Software Foundation, Inc.
4 4
5# This file is part of GNU Emacs. 5# This file is part of GNU Emacs.
@@ -447,7 +447,7 @@ yow${EXEEXT}: ${srcdir}/yow.c ../src/epaths.h
447 447
448emacsclient${EXEEXT}: ${srcdir}/emacsclient.c ../src/config.h $(GETOPTDEPS) 448emacsclient${EXEEXT}: ${srcdir}/emacsclient.c ../src/config.h $(GETOPTDEPS)
449 $(CC) ${ALL_CFLAGS} ${srcdir}/emacsclient.c $(GETOPTOBJS) \ 449 $(CC) ${ALL_CFLAGS} ${srcdir}/emacsclient.c $(GETOPTOBJS) \
450 -DVERSION=`sed -n -e '/(defconst emacs-version/ s/^[^"]*\("[^"]*"\).*/\1/p' ${srcdir}/../lisp/version.el` \ 450 -DVERSION="\"${version}\"" \
451 $(LOADLIBES) -o emacsclient 451 $(LOADLIBES) -o emacsclient
452 452
453hexl${EXEEXT}: ${srcdir}/hexl.c ../src/config.h 453hexl${EXEEXT}: ${srcdir}/hexl.c ../src/config.h
@@ -478,6 +478,3 @@ xveterm${EXEEXT}: ${srcdir}/emacstool.c
478 $(CC) -o xveterm -DXVIEW -DTTERM ${ALL_CFLAGS} ${srcdir}/emacstool.c \ 478 $(CC) -o xveterm -DXVIEW -DTTERM ${ALL_CFLAGS} ${srcdir}/emacstool.c \
479 -lxview -lolgx -lX -I$(OPENWINHOME)/include -L$(OPENWINHOME)/lib \ 479 -lxview -lolgx -lX -I$(OPENWINHOME)/include -L$(OPENWINHOME)/lib \
480 $(LOADLIBES) 480 $(LOADLIBES)
481
482/* arch-tag: cc40144d-fbd2-436b-9a22-dcb5b5b6a2af
483 (do not change this comment) */
diff --git a/lib-src/b2m.c b/lib-src/b2m.c
index 5a1f9e85473..5bebe560e2a 100644
--- a/lib-src/b2m.c
+++ b/lib-src/b2m.c
@@ -39,15 +39,6 @@
39#undef FALSE 39#undef FALSE
40#define FALSE 0 40#define FALSE 0
41 41
42/* Exit codes for success and failure. */
43#ifdef VMS
44#define GOOD 1
45#define BAD 0
46#else
47#define GOOD 0
48#define BAD 1
49#endif
50
51#define streq(s,t) (strcmp (s, t) == 0) 42#define streq(s,t) (strcmp (s, t) == 0)
52#define strneq(s,t,n) (strncmp (s, t, n) == 0) 43#define strneq(s,t,n) (strncmp (s, t, n) == 0)
53 44
@@ -124,18 +115,18 @@ main (argc, argv)
124 case 'V': 115 case 'V':
125 printf ("%s (GNU Emacs %s)\n", "b2m", VERSION); 116 printf ("%s (GNU Emacs %s)\n", "b2m", VERSION);
126 puts ("b2m is in the public domain."); 117 puts ("b2m is in the public domain.");
127 exit (GOOD); 118 exit (EXIT_SUCCESS);
128 119
129 case 'h': 120 case 'h':
130 fprintf (stderr, "Usage: %s <babylmailbox >unixmailbox\n", progname); 121 fprintf (stderr, "Usage: %s <babylmailbox >unixmailbox\n", progname);
131 exit (GOOD); 122 exit (EXIT_SUCCESS);
132 } 123 }
133 } 124 }
134 125
135 if (optind != argc) 126 if (optind != argc)
136 { 127 {
137 fprintf (stderr, "Usage: %s <babylmailbox >unixmailbox\n", progname); 128 fprintf (stderr, "Usage: %s <babylmailbox >unixmailbox\n", progname);
138 exit (GOOD); 129 exit (EXIT_SUCCESS);
139 } 130 }
140 131
141 labels_saved = printing = header = FALSE; 132 labels_saved = printing = header = FALSE;
@@ -191,7 +182,7 @@ main (argc, argv)
191 puts (data.buffer); 182 puts (data.buffer);
192 } 183 }
193 184
194 return 0; 185 return EXIT_SUCCESS;
195} 186}
196 187
197 188
@@ -298,8 +289,10 @@ fatal (message)
298 char *message; 289 char *message;
299{ 290{
300 fprintf (stderr, "%s: %s\n", progname, message); 291 fprintf (stderr, "%s: %s\n", progname, message);
301 exit (BAD); 292 exit (EXIT_FAILURE);
302} 293}
303 294
304/* arch-tag: 5a3ad2af-a802-408f-83cc-e7cf5e98653e 295/* arch-tag: 5a3ad2af-a802-408f-83cc-e7cf5e98653e
305 (do not change this comment) */ 296 (do not change this comment) */
297
298/* b2m.c ends here */
diff --git a/lib-src/cvtmail.c b/lib-src/cvtmail.c
index 28a4ae4c703..8992b3f9e80 100644
--- a/lib-src/cvtmail.c
+++ b/lib-src/cvtmail.c
@@ -119,7 +119,7 @@ main (argc, argv)
119 } 119 }
120 fclose (mddf); 120 fclose (mddf);
121 fclose (mfilef); 121 fclose (mfilef);
122 return 0; 122 return EXIT_SUCCESS;
123} 123}
124 124
125void 125void
@@ -148,7 +148,7 @@ fatal (s1, s2)
148 char *s1, *s2; 148 char *s1, *s2;
149{ 149{
150 error (s1, s2); 150 error (s1, s2);
151 exit (1); 151 exit (EXIT_FAILURE);
152} 152}
153 153
154void 154void
@@ -157,7 +157,7 @@ sysfail (s)
157{ 157{
158 fprintf (stderr, "cvtmail: "); 158 fprintf (stderr, "cvtmail: ");
159 perror (s); 159 perror (s);
160 exit (1); 160 exit (EXIT_FAILURE);
161} 161}
162 162
163char * 163char *
@@ -183,3 +183,5 @@ xrealloc (ptr, size)
183 183
184/* arch-tag: b93c25a9-9012-44f1-b78b-9cc7aed44a7a 184/* arch-tag: b93c25a9-9012-44f1-b78b-9cc7aed44a7a
185 (do not change this comment) */ 185 (do not change this comment) */
186
187/* cvtmail.c ends here */
diff --git a/lib-src/ebrowse.c b/lib-src/ebrowse.c
index eeeb0eb3efd..4ad45d195f6 100644
--- a/lib-src/ebrowse.c
+++ b/lib-src/ebrowse.c
@@ -564,7 +564,7 @@ xmalloc (nbytes)
564 if (p == NULL) 564 if (p == NULL)
565 { 565 {
566 yyerror ("out of memory", NULL); 566 yyerror ("out of memory", NULL);
567 exit (1); 567 exit (EXIT_FAILURE);
568 } 568 }
569 return p; 569 return p;
570} 570}
@@ -581,7 +581,7 @@ xrealloc (p, sz)
581 if (p == NULL) 581 if (p == NULL)
582 { 582 {
583 yyerror ("out of memory", NULL); 583 yyerror ("out of memory", NULL);
584 exit (1); 584 exit (EXIT_FAILURE);
585 } 585 }
586 return p; 586 return p;
587} 587}
@@ -3671,7 +3671,7 @@ usage (error)
3671 int error; 3671 int error;
3672{ 3672{
3673 puts (USAGE); 3673 puts (USAGE);
3674 exit (error ? 1 : 0); 3674 exit (error ? EXIT_FAILURE : EXIT_SUCCESS);
3675} 3675}
3676 3676
3677 3677
@@ -3688,7 +3688,7 @@ version ()
3688 printf ("ebrowse %s\n", VERSION); 3688 printf ("ebrowse %s\n", VERSION);
3689 puts ("Copyright (C) 1992-1999, 2000, 2001 Free Software Foundation, Inc."); 3689 puts ("Copyright (C) 1992-1999, 2000, 2001 Free Software Foundation, Inc.");
3690 puts ("This program is distributed under the same terms as Emacs."); 3690 puts ("This program is distributed under the same terms as Emacs.");
3691 exit (0); 3691 exit (EXIT_SUCCESS);
3692} 3692}
3693 3693
3694 3694
@@ -3925,7 +3925,7 @@ main (argc, argv)
3925 if (yyout == NULL) 3925 if (yyout == NULL)
3926 { 3926 {
3927 yyerror ("cannot open output file `%s'", out_filename); 3927 yyerror ("cannot open output file `%s'", out_filename);
3928 exit (1); 3928 exit (EXIT_FAILURE);
3929 } 3929 }
3930 } 3930 }
3931 3931
@@ -3970,11 +3970,10 @@ main (argc, argv)
3970 if (yyout != stdout) 3970 if (yyout != stdout)
3971 fclose (yyout); 3971 fclose (yyout);
3972 3972
3973 return 0; 3973 return EXIT_SUCCESS;
3974} 3974}
3975 3975
3976
3977/* ebrowse.c ends here. */
3978
3979/* arch-tag: fc03b4bc-91a9-4c3d-b3b9-12a77fa86dd8 3976/* arch-tag: fc03b4bc-91a9-4c3d-b3b9-12a77fa86dd8
3980 (do not change this comment) */ 3977 (do not change this comment) */
3978
3979/* ebrowse.c ends here */
diff --git a/lib-src/emacsclient.c b/lib-src/emacsclient.c
index c8b2596198f..0698691bf13 100644
--- a/lib-src/emacsclient.c
+++ b/lib-src/emacsclient.c
@@ -44,9 +44,6 @@ Boston, MA 02111-1307, USA. */
44char *getenv (), *getwd (); 44char *getenv (), *getwd ();
45char *getcwd (); 45char *getcwd ();
46 46
47/* This is defined with -D from the compilation command,
48 which extracts it from ../lisp/version.el. */
49
50#ifndef VERSION 47#ifndef VERSION
51#define VERSION "unspecified" 48#define VERSION "unspecified"
52#endif 49#endif
@@ -131,7 +128,7 @@ decode_options (argc, argv)
131 128
132 case 'V': 129 case 'V':
133 printf ("emacsclient %s\n", VERSION); 130 printf ("emacsclient %s\n", VERSION);
134 exit (0); 131 exit (EXIT_SUCCESS);
135 break; 132 break;
136 133
137 case 'H': 134 case 'H':
@@ -140,7 +137,7 @@ decode_options (argc, argv)
140 137
141 default: 138 default:
142 fprintf (stderr, "Try `%s --help' for more information\n", progname); 139 fprintf (stderr, "Try `%s --help' for more information\n", progname);
143 exit (1); 140 exit (EXIT_FAILURE);
144 break; 141 break;
145 } 142 }
146 } 143 }
@@ -166,7 +163,7 @@ The following OPTIONS are accepted:\n\
166 Editor to fallback to if the server is not running\n\ 163 Editor to fallback to if the server is not running\n\
167\n\ 164\n\
168Report bugs to bug-gnu-emacs@gnu.org.\n", progname); 165Report bugs to bug-gnu-emacs@gnu.org.\n", progname);
169 exit (0); 166 exit (EXIT_SUCCESS);
170} 167}
171 168
172/* In NAME, insert a & before each &, each space, each newline, and 169/* In NAME, insert a & before each &, each space, each newline, and
@@ -221,7 +218,7 @@ xmalloc (size)
221 if (result == NULL) 218 if (result == NULL)
222 { 219 {
223 perror ("malloc"); 220 perror ("malloc");
224 exit (1); 221 exit (EXIT_FAILURE);
225 } 222 }
226 return result; 223 return result;
227} 224}
@@ -243,7 +240,7 @@ fail (argc, argv)
243 } 240 }
244 else 241 else
245 { 242 {
246 exit (1); 243 exit (EXIT_FAILURE);
247 } 244 }
248} 245}
249 246
@@ -314,7 +311,7 @@ main (argc, argv)
314 { 311 {
315 fprintf (stderr, "%s: file name or argument required\n", progname); 312 fprintf (stderr, "%s: file name or argument required\n", progname);
316 fprintf (stderr, "Try `%s --help' for more information\n", progname); 313 fprintf (stderr, "Try `%s --help' for more information\n", progname);
317 exit (1); 314 exit (EXIT_FAILURE);
318 } 315 }
319 316
320 /* 317 /*
@@ -356,7 +353,7 @@ main (argc, argv)
356 { 353 {
357 fprintf (stderr, "%s: socket-name %s too long", 354 fprintf (stderr, "%s: socket-name %s too long",
358 argv[0], socket_name); 355 argv[0], socket_name);
359 exit (1); 356 exit (EXIT_FAILURE);
360 } 357 }
361 358
362 /* See if the socket exists, and if it's owned by us. */ 359 /* See if the socket exists, and if it's owned by us. */
@@ -391,7 +388,7 @@ main (argc, argv)
391 { 388 {
392 fprintf (stderr, "%s: socket-name %s too long", 389 fprintf (stderr, "%s: socket-name %s too long",
393 argv[0], socket_name); 390 argv[0], socket_name);
394 exit (1); 391 exit (EXIT_FAILURE);
395 } 392 }
396 393
397 sock_status = socket_status (server.sun_path); 394 sock_status = socket_status (server.sun_path);
@@ -522,13 +519,13 @@ To start the server in Emacs, type \"M-x server-start\".\n",
522 } 519 }
523 fprintf (out, " "); 520 fprintf (out, " ");
524 } 521 }
525 522
526 fprintf (out, "\n"); 523 fprintf (out, "\n");
527 fflush (out); 524 fflush (out);
528 525
529 /* Maybe wait for an answer. */ 526 /* Maybe wait for an answer. */
530 if (nowait) 527 if (nowait)
531 return 0; 528 return EXIT_SUCCESS;
532 529
533 if (!eval) 530 if (!eval)
534 { 531 {
@@ -550,7 +547,7 @@ To start the server in Emacs, type \"M-x server-start\".\n",
550 printf ("\n"); 547 printf ("\n");
551 fflush (stdout); 548 fflush (stdout);
552 549
553 return 0; 550 return EXIT_SUCCESS;
554} 551}
555 552
556#endif /* HAVE_SOCKETS */ 553#endif /* HAVE_SOCKETS */
@@ -572,3 +569,5 @@ strerror (errnum)
572 569
573/* arch-tag: f39bb9c4-73eb-477e-896d-50832e2ca9a7 570/* arch-tag: f39bb9c4-73eb-477e-896d-50832e2ca9a7
574 (do not change this comment) */ 571 (do not change this comment) */
572
573/* emacsclient.c ends here */
diff --git a/lib-src/etags.c b/lib-src/etags.c
index e9fab1be3ee..829fc97fbfd 100644
--- a/lib-src/etags.c
+++ b/lib-src/etags.c
@@ -177,15 +177,6 @@ If you want regular expression support, you should delete this notice and
177# define CTAGS FALSE 177# define CTAGS FALSE
178#endif 178#endif
179 179
180/* Exit codes for success and failure. */
181#ifdef VMS
182# define GOOD 1
183# define BAD 0
184#else
185# define GOOD 0
186# define BAD 1
187#endif
188
189#define streq(s,t) (assert((s)!=NULL || (t)!=NULL), !strcmp (s, t)) 180#define streq(s,t) (assert((s)!=NULL || (t)!=NULL), !strcmp (s, t))
190#define strcaseeq(s,t) (assert((s)!=NULL && (t)!=NULL), !etags_strcasecmp (s, t)) 181#define strcaseeq(s,t) (assert((s)!=NULL && (t)!=NULL), !etags_strcasecmp (s, t))
191#define strneq(s,t,n) (assert((s)!=NULL || (t)!=NULL), !strncmp (s, t, n)) 182#define strneq(s,t,n) (assert((s)!=NULL || (t)!=NULL), !strncmp (s, t, n))
@@ -830,7 +821,7 @@ print_version ()
830 puts ("Copyright (C) 2002 Free Software Foundation, Inc. and Ken Arnold"); 821 puts ("Copyright (C) 2002 Free Software Foundation, Inc. and Ken Arnold");
831 puts ("This program is distributed under the same terms as Emacs"); 822 puts ("This program is distributed under the same terms as Emacs");
832 823
833 exit (GOOD); 824 exit (EXIT_SUCCESS);
834} 825}
835 826
836static void 827static void
@@ -849,7 +840,7 @@ print_help (argbuffer)
849 } 840 }
850 841
851 if (help_for_lang) 842 if (help_for_lang)
852 exit (GOOD); 843 exit (EXIT_SUCCESS);
853 844
854 printf ("Usage: %s [options] [[regex-option ...] file-name] ...\n\ 845 printf ("Usage: %s [options] [[regex-option ...] file-name] ...\n\
855\n\ 846\n\
@@ -990,7 +981,7 @@ Relative ones are stored relative to the output file's directory.\n");
990 puts (""); 981 puts ("");
991 puts ("Report bugs to bug-gnu-emacs@gnu.org"); 982 puts ("Report bugs to bug-gnu-emacs@gnu.org");
992 983
993 exit (GOOD); 984 exit (EXIT_SUCCESS);
994} 985}
995 986
996 987
@@ -1413,7 +1404,7 @@ main (argc, argv)
1413 1404
1414 if (fclose (tagf) == EOF) 1405 if (fclose (tagf) == EOF)
1415 pfatal (tagfile); 1406 pfatal (tagfile);
1416 exit (GOOD); 1407 exit (EXIT_SUCCESS);
1417 } 1408 }
1418 1409
1419 if (update) 1410 if (update)
@@ -1432,7 +1423,7 @@ main (argc, argv)
1432 sprintf (cmd, 1423 sprintf (cmd,
1433 "mv %s OTAGS;fgrep -v '\t%s\t' OTAGS >%s;rm OTAGS", 1424 "mv %s OTAGS;fgrep -v '\t%s\t' OTAGS >%s;rm OTAGS",
1434 tagfile, argbuffer[i].what, tagfile); 1425 tagfile, argbuffer[i].what, tagfile);
1435 if (system (cmd) != GOOD) 1426 if (system (cmd) != EXIT_SUCCESS)
1436 fatal ("failed to execute shell command", (char *)NULL); 1427 fatal ("failed to execute shell command", (char *)NULL);
1437 } 1428 }
1438 append_to_tagfile = TRUE; 1429 append_to_tagfile = TRUE;
@@ -1453,7 +1444,7 @@ main (argc, argv)
1453 sprintf (cmd, "sort -o %.*s %.*s", BUFSIZ, tagfile, BUFSIZ, tagfile); 1444 sprintf (cmd, "sort -o %.*s %.*s", BUFSIZ, tagfile, BUFSIZ, tagfile);
1454 exit (system (cmd)); 1445 exit (system (cmd));
1455 } 1446 }
1456 return GOOD; 1447 return EXIT_SUCCESS;
1457} 1448}
1458 1449
1459 1450
@@ -6470,7 +6461,7 @@ fatal (s1, s2)
6470 char *s1, *s2; 6461 char *s1, *s2;
6471{ 6462{
6472 error (s1, s2); 6463 error (s1, s2);
6473 exit (BAD); 6464 exit (EXIT_FAILURE);
6474} 6465}
6475 6466
6476static void 6467static void
@@ -6478,7 +6469,7 @@ pfatal (s1)
6478 char *s1; 6469 char *s1;
6479{ 6470{
6480 perror (s1); 6471 perror (s1);
6481 exit (BAD); 6472 exit (EXIT_FAILURE);
6482} 6473}
6483 6474
6484static void 6475static void
@@ -6492,7 +6483,7 @@ fprintf (stderr, "\tTry `%s %s' for a complete list of options.\n",
6492fprintf (stderr, "\tTry `%s %s' for a complete list of options.\n", 6483fprintf (stderr, "\tTry `%s %s' for a complete list of options.\n",
6493 progname, "-h"); 6484 progname, "-h");
6494#endif 6485#endif
6495 exit (BAD); 6486 exit (EXIT_FAILURE);
6496} 6487}
6497 6488
6498/* Print error message. `s1' is printf control string, `s2' is arg for it. */ 6489/* Print error message. `s1' is printf control string, `s2' is arg for it. */
@@ -6788,3 +6779,5 @@ xrealloc (ptr, size)
6788 6779
6789/* arch-tag: 8a9b748d-390c-4922-99db-2eeefa921051 6780/* arch-tag: 8a9b748d-390c-4922-99db-2eeefa921051
6790 (do not change this comment) */ 6781 (do not change this comment) */
6782
6783/* etags.c ends here */
diff --git a/lib-src/fakemail.c b/lib-src/fakemail.c
index 944a728a28c..cee7eaa130e 100644
--- a/lib-src/fakemail.c
+++ b/lib-src/fakemail.c
@@ -169,7 +169,7 @@ fatal (s1, s2)
169 char *s1, *s2; 169 char *s1, *s2;
170{ 170{
171 error (s1, s2); 171 error (s1, s2);
172 exit (1); 172 exit (EXIT_FAILURE);
173} 173}
174 174
175/* Like malloc but get fatal error if memory is exhausted. */ 175/* Like malloc but get fatal error if memory is exhausted. */
@@ -410,7 +410,7 @@ close_the_streams ()
410 no_problems = (no_problems && 410 no_problems = (no_problems &&
411 ((*rem->action) (rem->handle) == 0)); 411 ((*rem->action) (rem->handle) == 0));
412 the_streams = ((stream_list) NULL); 412 the_streams = ((stream_list) NULL);
413 return (no_problems ? 0 : 1); 413 return (no_problems ? EXIT_SUCCESS : EXIT_FAILURE);
414} 414}
415 415
416void 416void
@@ -667,7 +667,7 @@ read_header ()
667 if (next_line == ((line_list *) NULL)) 667 if (next_line == ((line_list *) NULL))
668 { 668 {
669 /* Not a valid header */ 669 /* Not a valid header */
670 exit (1); 670 exit (EXIT_FAILURE);
671 } 671 }
672 *next_line = new_list (); 672 *next_line = new_list ();
673 (*next_line)->string = alloc_string (length); 673 (*next_line)->string = alloc_string (length);
@@ -753,3 +753,5 @@ main (argc, argv)
753 753
754/* arch-tag: acb0afa6-315a-4c5b-b9e3-def5725c8783 754/* arch-tag: acb0afa6-315a-4c5b-b9e3-def5725c8783
755 (do not change this comment) */ 755 (do not change this comment) */
756
757/* fakemail.c ends here */
diff --git a/lib-src/hexl.c b/lib-src/hexl.c
index 0cfb88445b3..5ca7c2a5b8a 100644
--- a/lib-src/hexl.c
+++ b/lib-src/hexl.c
@@ -270,15 +270,17 @@ main (argc, argv)
270 fclose (fp); 270 fclose (fp);
271 271
272 } while (*argv != NULL); 272 } while (*argv != NULL);
273 return 0; 273 return EXIT_SUCCESS;
274} 274}
275 275
276void 276void
277usage () 277usage ()
278{ 278{
279 fprintf (stderr, "usage: %s [-de] [-iso]\n", progname); 279 fprintf (stderr, "usage: %s [-de] [-iso]\n", progname);
280 exit (1); 280 exit (EXIT_FAILURE);
281} 281}
282 282
283/* arch-tag: 20e04fb7-926e-4e48-be86-64fe869ecdaa 283/* arch-tag: 20e04fb7-926e-4e48-be86-64fe869ecdaa
284 (do not change this comment) */ 284 (do not change this comment) */
285
286/* hexl.c ends here */
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c
index ba73f5800a7..802b4e09e67 100644
--- a/lib-src/make-docfile.c
+++ b/lib-src/make-docfile.c
@@ -60,6 +60,10 @@ Boston, MA 02111-1307, USA. */
60#define READ_BINARY "r" 60#define READ_BINARY "r"
61#endif /* not DOS_NT */ 61#endif /* not DOS_NT */
62 62
63#ifndef IS_DIRECTORY_SEP
64#define IS_DIRECTORY_SEP(_c_) ((_c_) == '/')
65#endif
66
63int scan_file (); 67int scan_file ();
64int scan_lisp_file (); 68int scan_lisp_file ();
65int scan_c_file (); 69int scan_c_file ();
@@ -100,7 +104,7 @@ fatal (s1, s2)
100 char *s1, *s2; 104 char *s1, *s2;
101{ 105{
102 error (s1, s2); 106 error (s1, s2);
103 exit (1); 107 exit (EXIT_FAILURE);
104} 108}
105 109
106/* Like malloc but get fatal error if memory is exhausted. */ 110/* Like malloc but get fatal error if memory is exhausted. */
@@ -183,11 +187,13 @@ void
183put_filename (filename) 187put_filename (filename)
184 char *filename; 188 char *filename;
185{ 189{
186 char *tmp = filename; 190 char *tmp;
187 int len; 191
188 192 for (tmp = filename; *tmp; tmp++)
189 while ((tmp = index (filename, '/'))) 193 {
190 filename = tmp + 1; 194 if (IS_DIRECTORY_SEP(*tmp))
195 filename = tmp + 1;
196 }
191 197
192 putc (037, outfile); 198 putc (037, outfile);
193 putc ('S', outfile); 199 putc ('S', outfile);
@@ -1204,3 +1210,5 @@ scan_lisp_file (filename, mode)
1204 1210
1205/* arch-tag: f7203aaf-991a-4238-acb5-601db56f2894 1211/* arch-tag: f7203aaf-991a-4238-acb5-601db56f2894
1206 (do not change this comment) */ 1212 (do not change this comment) */
1213
1214/* make-docfile.c ends here */
diff --git a/lib-src/makefile.nt b/lib-src/makefile.nt
deleted file mode 100644
index 29282eea45d..00000000000
--- a/lib-src/makefile.nt
+++ /dev/null
@@ -1,417 +0,0 @@
1# Makefile for GNU Emacs lib-src directory.
2# Geoff Voelker (voelker@cs.washington.edu)
3# Copyright (C) 1994 Free Software Foundation, Inc.
4#
5# This file is part of GNU Emacs.
6#
7# GNU Emacs is free software; you can redistribute it and/or modify
8# it under the terms of the GNU General Public License as published by
9# the Free Software Foundation; either version 2, or (at your option)
10# any later version.
11#
12# GNU Emacs is distributed in the hope that it will be useful,
13# but WITHOUT ANY WARRANTY; without even the implied warranty of
14# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15# GNU General Public License for more details.
16#
17# You should have received a copy of the GNU General Public License
18# along with GNU Emacs; see the file COPYING. If not, write to the
19# Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20# Boston, MA 02111-1307, USA.
21#
22
23#
24# Sets up the system dependent macros.
25#
26!include ..\nt\makefile.def
27
28LOCAL_FLAGS = -DWINDOWSNT -DDOS_NT -DSTDC_HEADERS=1 -DNO_LDAV=1 \
29 -DNO_ARCHIVES=1 -DHAVE_CONFIG_H=1 -I..\nt\inc -I..\src
30
31LINK_FLAGS = $(ARCH_LDFLAGS) -debug:PARTIAL -machine:$(ARCH) -subsystem:console -entry:mainCRTStartup setargv.obj
32
33ALL = $(BLD)\make-docfile.exe \
34 $(BLD)\hexl.exe \
35 $(BLD)\ctags.exe \
36 $(BLD)\etags.exe \
37 $(BLD)\ebrowse.exe \
38 $(BLD)\movemail.exe
39
40
41# don't know what (if) to do with these yet...
42#
43# $(BLD)\sorted-doc.exe \
44# $(BLD)\env.exe \
45# $(BLD)\server.exe \
46# $(BLD)\emacstool.exe \
47# $(BLD)\leditcfns.exe \
48# $(BLD)\emacsclient.exe \
49# $(BLD)\cvtmail.exe \
50# $(BLD)\digest-doc.exe \
51# $(BLD)\test-distrib.exe \
52
53
54LIBS = $(BASE_LIBS)
55
56$(BLD)\make-docfile.exe: $(BLD)\make-docfile.obj $(BLD)\ntlib.obj
57 $(LINK) -out:$@ $(LINK_FLAGS) $(BLD)\make-docfile.obj $(BLD)\ntlib.obj $(LIBS)
58$(BLD)\hexl.exe: $(BLD)\hexl.obj
59$(BLD)\fakemail.exe: $(BLD)\fakemail.obj $(BLD)\ntlib.obj
60 $(LINK) -out:$@ $(LINK_FLAGS) -debug:full $(BLD)\fakemail.obj $(BLD)\ntlib.obj $(LIBS)
61
62make-docfile: $(BLD) $(BLD)\make-docfile.exe
63etags: $(BLD) $(BLD)\etags.exe
64ebrowse: $(BLD) $(BLD)\ebrowse.exe
65hexl: $(BLD) $(BLD)\hexl.exe
66movemail: $(BLD) $(BLD)\movemail.exe
67fakemail: $(BLD) $(BLD)\fakemail.exe
68
69GETOPTOBJS = $(BLD)\getopt.obj $(BLD)\getopt1.obj
70GETOPTDEPS = $(GETOPTOBJS) getopt.h
71MOVEMAILOBJS = $(BLD)\movemail.obj \
72 $(BLD)\pop.obj \
73 $(BLD)\ntlib.obj \
74 $(GETOPTOBJS)
75
76$(BLD)\movemail.exe: $(MOVEMAILOBJS) getopt.h
77# put wsock32.lib before $(LIBS) to ensure we don't link to ws2_32.lib
78 $(LINK) -out:$@ $(LINK_FLAGS) -debug:FULL $(MOVEMAILOBJS) wsock32.lib $(LIBS)
79
80ETAGSOBJ = $(BLD)\etags.obj \
81 $(BLD)\getopt.obj \
82 $(BLD)\getopt1.obj \
83 $(BLD)\ntlib.obj \
84 $(BLD)\regex.obj
85
86
87$(BLD)\etags.exe: $(ETAGSOBJ)
88 $(LINK) -out:$@ $(LINK_FLAGS) $(ETAGSOBJ) $(LIBS)
89
90
91$(BLD)\regex.obj: ../src/regex.c ../src/regex.h ../src/config.h
92 $(CC) $(CFLAGS) -DCONFIG_BROKETS -DINHIBIT_STRING_HEADER \
93 ../src/regex.c -Fo$@
94
95ETAGS_CFLAGS = -DETAGS_REGEXPS -DHAVE_GETCWD
96$(BLD)\etags.obj: etags.c
97 $(CC) $(CFLAGS) $(ETAGS_CFLAGS) -Fo$@ etags.c
98
99CTAGSOBJ = $(BLD)\ctags.obj \
100 $(BLD)\getopt.obj \
101 $(BLD)\getopt1.obj \
102 $(BLD)\ntlib.obj \
103 $(BLD)\regex.obj
104
105$(BLD)\ctags.exe: ctags.c $(CTAGSOBJ)
106 $(LINK) -out:$@ $(LINK_FLAGS) $(CTAGSOBJ) $(LIBS)
107
108ctags.c: etags.c
109 - $(DEL) ctags.c
110 copy etags.c ctags.c
111
112CTAGS_CFLAGS = -DCTAGS $(ETAGS_CFLAGS)
113$(BLD)\ctags.obj: ctags.c
114 $(CC) $(CFLAGS) $(CTAGS_CFLAGS) -Fo$@ ctags.c
115
116EBROWSE_OBJ = $(BLD)\ebrowse.obj \
117 $(BLD)\getopt.obj \
118 $(BLD)\getopt1.obj \
119 $(BLD)\ntlib.obj
120
121$(BLD)\ebrowse.exe: $(EBROWSE_OBJ)
122 $(LINK) -out:$@ $(LINK_FLAGS) $(EBROWSE_OBJ) $(LIBS)
123
124$(BLD)\ebrowse.obj: ebrowse.c ..\src\config.h
125 $(CC) $(CFLAGS) -DVERSION=\"$(VERSION)\" -Fo$@ ebrowse.c
126#
127# don't know what to do with these yet...
128#
129# $(BLD)\sorted-doc.exe: $(BLD)\sorted-doc.obj
130# $(BLD)\yow.exe: $(BLD)\yow.obj
131# $(BLD)\emacstool.exe: $(BLD)\emacstool.obj
132# $(BLD)\leditcfns.exe: $(BLD)\leditcfns.obj
133# $(BLD)\server.exe: $(BLD)\server.obj
134# $(BLD)\cvtmail.exe: $(BLD)\cvtmail.obj
135# $(BLD)\digest-doc.exe: $(BLD)\digest-doc.obj
136# $(BLD)\emacsclient.exe: $(BLD)\emacsclient.obj
137# $(BLD)\test-distrib.exe: $(BLD)\test-distrib.obj
138
139#
140# From ..\src\makefile.nt.
141#
142obj = abbrev.c alloc.c alloca.c buffer.c bytecode.c callint.c callproc.c casefiddle.c cm.c cmds.c charset.c coding.c category.c ccl.c data.c dired.c dispnew.c doc.c doprnt.c editfns.c emacs.c eval.c fileio.c filelock.c filemode.c fns.c fontset.c indent.c insdel.c keyboard.c keymap.c lastfile.c lread.c macros.c marker.c minibuf.c xfaces.c print.c process.c regex.c scroll.c search.c syntax.c sysdep.c term.c termcap.c tparam.c undo.c unexw32.c window.c xdisp.c casetab.c floatfns.c frame.c gmalloc.c intervals.c ralloc.c textprop.c vm-limit.c region-cache.c strftime.c w32.c w32console.c w32faces.c w32fns.c w32heap.c w32inevt.c w32proc.c w32reg.c w32menu.c w32select.c w32term.c w32xfns.c
143
144#
145# These are the lisp files that are loaded up in loadup.el
146#
147lispsource = ../lisp/
148
149FACE_SUPPORT = $(lispsource)facemenu.elc
150MOUSE_SUPPORT = $(lispsource)select.elc $(lispsource)scroll-bar.elc $(lispsource)mouse.elc
151FLOAT_SUPPORT = $(lispsource)float-sup.elc
152WINNT_SUPPORT = $(lispsource)ls-lisp.elc $(lispsource)w32-fns.elc $(lispsource)dos-w32.elc
153
154lisp= \
155 $(lispsource)abbrev.elc \
156 $(lispsource)buff-menu.elc \
157 $(lispsource)byte-run.elc \
158 $(lispsource)cus-start.el \
159 $(lispsource)custom.elc \
160 $(lispsource)disp-table.elc \
161 $(lispsource)faces.elc \
162 $(lispsource)files.elc \
163 $(lispsource)textmodes/fill.elc \
164 $(lispsource)format.elc \
165 $(FACE_SUPPORT) \
166 $(MOUSE_SUPPORT) \
167 $(FLOAT_SUPPORT) \
168 $(lispsource)frame.elc\
169 $(X_WINDOWS_SUPPORT) \
170 $(lispsource)help.elc \
171 $(lispsource)indent.elc \
172 $(lispsource)isearch.elc \
173 $(lispsource)emacs-lisp/lisp-mode.elc \
174 $(lispsource)emacs-lisp/lisp.elc \
175 $(lispsource)loadup.el \
176 $(lispsource)loaddefs.el \
177 $(lispsource)bindings.el \
178 $(lispsource)map-ynp.elc \
179 $(lispsource)menu-bar.elc \
180 $(lispsource)international/mule.elc \
181 $(lispsource)international/mule-conf.el \
182 $(lispsource)international/mule-cmds.elc \
183 $(lispsource)international/characters.elc \
184 $(lispsource)international/ccl.elc \
185 $(lispsource)international/codepage.elc \
186 $(lispsource)international/utf-8.elc \
187 $(lispsource)case-table.elc \
188 $(lispsource)language/chinese.elc \
189 $(lispsource)language/cyrillic.elc \
190 $(lispsource)language/devanagari.elc \
191 $(lispsource)language/english.elc \
192 $(lispsource)language/ethiopic.elc \
193 $(lispsource)language/european.elc \
194 $(lispsource)language/czech.elc \
195 $(lispsource)language/slovak.elc \
196 $(lispsource)language/romanian.elc \
197 $(lispsource)language/greek.elc \
198 $(lispsource)language/hebrew.elc \
199 $(lispsource)language/indian.elc \
200 $(lispsource)language/japanese.elc \
201 $(lispsource)language/korean.elc \
202 $(lispsource)language/lao.elc \
203 $(lispsource)language/thai.elc \
204 $(lispsource)language/tibetan.elc \
205 $(lispsource)language/vietnamese.elc \
206 $(lispsource)language/misc-lang.elc \
207 $(lispsource)textmodes/page.elc \
208 $(lispsource)textmodes/paragraphs.elc \
209 $(lispsource)paths.el \
210 $(lispsource)register.elc \
211 $(lispsource)replace.elc \
212 $(lispsource)simple.elc \
213 $(lispsource)startup.elc \
214 $(lispsource)subr.elc \
215 $(lispsource)term/tty-colors.elc \
216 $(lispsource)textmodes/text-mode.elc \
217 $(lispsource)vc-hooks.elc \
218 $(lispsource)ediff-hook.elc \
219 $(VMS_SUPPORT) \
220 $(MSDOS_SUPPORT) \
221 $(WINNT_SUPPORT) \
222 $(lispsource)widget.elc \
223 $(lispsource)window.elc \
224 $(lispsource)version.el
225
226
227DOC = DOC
228$(DOC): $(BLD)\make-docfile.exe
229 - $(DEL) $(DOC)
230 $(BLD)\make-docfile -d ..\src $(obj) > $(DOC)
231 $(BLD)\make-docfile -d ..\src $(lisp) >> $(DOC)
232 $(CP) $(DOC) ..\etc\DOC-X
233 - mkdir ..\src\$(OBJDIR)
234 - mkdir ..\src\$(OBJDIR)\etc
235 $(CP) $(DOC) ..\src\$(OBJDIR)\etc\DOC-X
236
237{$(BLD)}.obj{$(BLD)}.exe:
238 $(LINK) -out:$@ $(LINK_FLAGS) $*.obj $(LIBS)
239
240#
241# Build the executables
242#
243all: $(BLD) $(ALL) $(DOC)
244
245#
246# Assuming INSTALL_DIR is defined, build and install emacs in it.
247#
248INSTALL_FILES = $(ALL)
249install: $(INSTALL_FILES)
250 - mkdir $(INSTALL_DIR)\bin
251 $(CP) $(BLD)\etags.exe $(INSTALL_DIR)\bin
252 $(CP) $(BLD)\ctags.exe $(INSTALL_DIR)\bin
253 $(CP) $(BLD)\hexl.exe $(INSTALL_DIR)\bin
254 $(CP) $(BLD)\movemail.exe $(INSTALL_DIR)\bin
255 - mkdir $(INSTALL_DIR)\etc
256 $(CP) $(DOC) $(INSTALL_DIR)\etc
257
258# Don't install fakemail by default, as it sends mail into a
259# blackhole if /bin/mail is not installed.
260# $(CP) $(BLD)\fakemail.exe $(INSTALL_DIR)\bin
261
262#
263# Maintenance
264#
265clean:; - $(DEL) *~ *.pdb DOC*
266 - $(DEL) *.orig *.rej *.crlf ctags.c
267 - $(DEL_TREE) deleted
268 - $(DEL_TREE) obj
269 - $(DEL_TREE) obj-spd
270
271#
272# Headers we would preprocess if we could.
273#
274..\src\config.h: ..\nt\$(CONFIG_H)
275 $(CP) $** $@
276..\src\paths.h: ..\nt\paths.h
277 $(CP) $** $@
278
279### DEPENDENCIES ###
280
281EMACS_ROOT = ..
282SRC = .
283
284$(BLD)\b2m.obj : \
285 $(SRC)\b2m.c \
286 $(EMACS_ROOT)\src\s\ms-w32.h \
287 $(EMACS_ROOT)\src\m\intel386.h \
288 $(EMACS_ROOT)\lib-src\..\src\config.h
289
290$(BLD)\ctags.obj : \
291 $(SRC)\ctags.c \
292 $(EMACS_ROOT)\nt\inc\sys\param.h \
293 $(EMACS_ROOT)\src\s\ms-w32.h \
294 $(EMACS_ROOT)\src\m\intel386.h \
295 $(EMACS_ROOT)\lib-src\..\src\config.h \
296 $(SRC)\ntlib.h \
297 $(SRC)\getopt.h
298
299$(BLD)\cvtmail.obj : \
300 $(SRC)\cvtmail.c
301
302$(BLD)\digest-doc.obj : \
303 $(SRC)\digest-doc.c
304
305$(BLD)\emacsclient.obj : \
306 $(SRC)\emacsclient.c \
307 $(EMACS_ROOT)\src\s\ms-w32.h \
308 $(EMACS_ROOT)\src\m\intel386.h \
309 $(EMACS_ROOT)\lib-src\..\src\config.h
310
311$(BLD)\emacstool.obj : \
312 $(SRC)\emacstool.c \
313 $(EMACS_ROOT)\nt\inc\sys\file.h
314
315$(BLD)\etags.obj : \
316 $(SRC)\etags.c \
317 $(EMACS_ROOT)\nt\inc\sys\param.h \
318 $(EMACS_ROOT)\src\s\ms-w32.h \
319 $(EMACS_ROOT)\src\m\intel386.h \
320 $(EMACS_ROOT)\lib-src\..\src\config.h \
321 $(SRC)\ntlib.h \
322 $(SRC)\getopt.h
323
324$(BLD)\fakemail.obj : \
325 $(SRC)\fakemail.c \
326 $(SRC)\ntlib.h \
327 $(EMACS_ROOT)\src\s\ms-w32.h \
328 $(EMACS_ROOT)\src\m\intel386.h \
329 $(EMACS_ROOT)\lib-src\..\src\config.h \
330 $(EMACS_ROOT)\nt\inc\pwd.h
331
332$(BLD)\getdate.obj : \
333 $(SRC)\getdate.c \
334 $(EMACS_ROOT)\src\s\ms-w32.h \
335 $(EMACS_ROOT)\src\m\intel386.h \
336 $(EMACS_ROOT)\src\config.h \
337 $(MSTOOLS_SYS)\types.h
338
339$(BLD)\getopt.obj : \
340 $(SRC)\getopt.c \
341 $(EMACS_ROOT)\src\s\ms-w32.h \
342 $(EMACS_ROOT)\src\m\intel386.h \
343 $(EMACS_ROOT)\src\config.h \
344 $(SRC)\ntlib.h \
345 $(SRC)\getopt.h
346
347$(BLD)\getopt1.obj : \
348 $(SRC)\getopt1.c \
349 $(EMACS_ROOT)\src\s\ms-w32.h \
350 $(EMACS_ROOT)\src\m\intel386.h \
351 $(EMACS_ROOT)\src\config.h \
352 $(SRC)\getopt.h
353
354$(BLD)\hexl.obj : \
355 $(SRC)\hexl.c
356
357$(BLD)\leditcfns.obj : \
358 $(SRC)\leditcfns.c
359
360$(BLD)\make-docfile.obj : \
361 $(SRC)\make-docfile.c \
362 $(EMACS_ROOT)\src\config.h
363
364$(BLD)\make-path.obj : \
365 $(SRC)\make-path.c
366
367$(BLD)\movemail.obj : \
368 $(SRC)\movemail.c \
369 $(EMACS_ROOT)\src\s\ms-w32.h \
370 $(EMACS_ROOT)\src\m\intel386.h \
371 $(EMACS_ROOT)\lib-src\..\src\config.h \
372 $(EMACS_ROOT)\nt\inc\sys\file.h \
373 $(EMACS_ROOT)\lib-src\..\src\syswait.h \
374 $(EMACS_ROOT)\nt\inc\pwd.h \
375 $(SRC)\ntlib.h
376 $(CC) $(CFLAGS) -DUSG -Fo$@ movemail.c
377
378$(BLD)\ntlib.obj : \
379 $(SRC)\ntlib.c \
380 $(SRC)\ntlib.h \
381 $(EMACS_ROOT)\nt\inc\pwd.h
382
383$(BLD)\pop.obj : \
384 $(SRC)\pop.c \
385 $(SRC)\pop.h \
386 $(SRC)\ntlib.h
387
388$(BLD)\profile.obj : \
389 $(SRC)\profile.c \
390 $(EMACS_ROOT)\src\s\ms-w32.h \
391 $(EMACS_ROOT)\src\m\intel386.h \
392 $(EMACS_ROOT)\lib-src\..\src\config.h \
393 $(EMACS_ROOT)\lib-src\..\src\systime.h
394
395$(BLD)\qsort.obj : \
396 $(SRC)\qsort.c
397
398$(BLD)\sorted-doc.obj : \
399 $(SRC)\sorted-doc.c
400
401$(BLD)\tcp.obj : \
402 $(SRC)\tcp.c
403
404$(BLD)\test-distrib.obj : \
405 $(SRC)\test-distrib.c
406
407$(BLD)\timer.obj : \
408 $(SRC)\timer.c \
409 $(EMACS_ROOT)\src\s\ms-w32.h \
410 $(EMACS_ROOT)\src\m\intel386.h \
411 $(EMACS_ROOT)\lib-src\..\src\config.h
412
413$(BLD)\yow.obj : \
414 $(SRC)\yow.c \
415 $(EMACS_ROOT)\lib-src\..\src\paths.h
416
417# arch-tag: 59e1b54b-4cc2-4086-bb0b-ecfad4b683e9
diff --git a/lib-src/makefile.w32-in b/lib-src/makefile.w32-in
index 20cf4727362..663d08e6f13 100644
--- a/lib-src/makefile.w32-in
+++ b/lib-src/makefile.w32-in
@@ -1,5 +1,5 @@
1# Makefile for GNU Emacs on the Microsoft W32 API. 1# -*- Makefile -*- for GNU Emacs on the Microsoft W32 API.
2# Copyright (c) 2000-2001 Free Software Foundation, Inc. 2# Copyright (c) 2000-2001, 2004 Free Software Foundation, Inc.
3# 3#
4# This file is part of GNU Emacs. 4# This file is part of GNU Emacs.
5# 5#
@@ -126,7 +126,7 @@ $(BLD)/ctags.$(O): ctags.c
126# 126#
127# From ..\src\makefile.nt. 127# From ..\src\makefile.nt.
128# 128#
129obj = abbrev.c alloc.c alloca.c buffer.c bytecode.c callint.c callproc.c casefiddle.c casetab.c category.c ccl.c charset.c cm.c cmds.c coding.c data.c dired.c dispnew.c doc.c doprnt.c editfns.c emacs.c eval.c fileio.c filelock.c filemode.c floatfns.c fns.c fontset.c frame.c fringe.c gmalloc.c indent.c insdel.c intervals.c keyboard.c keymap.c lastfile.c lread.c macros.c marker.c minibuf.c print.c process.c ralloc.c regex.c region-cache.c scroll.c search.c sound.c strftime.c syntax.c sysdep.c term.c termcap.c textprop.c tparam.c undo.c unexw32.c vm-limit.c w32.c w32console.c w32fns.c w32heap.c w32inevt.c w32menu.c w32proc.c w32reg.c w32select.c w32term.c w32xfns.c window.c xdisp.c xfaces.c xfaces.c 129obj = abbrev.c alloc.c alloca.c buffer.c bytecode.c callint.c callproc.c casefiddle.c casetab.c category.c ccl.c charset.c cm.c cmds.c coding.c data.c dired.c dispnew.c doc.c doprnt.c editfns.c emacs.c eval.c fileio.c filelock.c filemode.c floatfns.c fns.c fontset.c frame.c fringe.c gmalloc.c image.c indent.c insdel.c intervals.c keyboard.c keymap.c lastfile.c lread.c macros.c marker.c minibuf.c print.c process.c ralloc.c regex.c region-cache.c scroll.c search.c sound.c strftime.c syntax.c sysdep.c term.c termcap.c textprop.c tparam.c undo.c unexw32.c vm-limit.c w32.c w32console.c w32fns.c w32heap.c w32inevt.c w32menu.c w32proc.c w32reg.c w32select.c w32term.c w32xfns.c window.c xdisp.c xfaces.c xfaces.c
130# 130#
131# These are the lisp files that are loaded up in loadup.el 131# These are the lisp files that are loaded up in loadup.el
132# 132#
@@ -139,7 +139,7 @@ WINNT_SUPPORT = $(lispsource)ls-lisp.elc $(lispsource)disp-table.elc $(lispsourc
139MSDOS_SUPPORT = $(lispsource)dos-fns.elc $(lispsource)dos-vars.elc $(lispsource)international/ccl.elc $(lispsource)international/codepage.elc 139MSDOS_SUPPORT = $(lispsource)dos-fns.elc $(lispsource)dos-vars.elc $(lispsource)international/ccl.elc $(lispsource)international/codepage.elc
140VMS_SUPPORT = $(lispsource)vmsproc.elc $(lispsource)vms-patch.elc 140VMS_SUPPORT = $(lispsource)vmsproc.elc $(lispsource)vms-patch.elc
141 141
142lisp= \ 142lisp1= \
143 $(lispsource)abbrev.elc \ 143 $(lispsource)abbrev.elc \
144 $(lispsource)buff-menu.elc \ 144 $(lispsource)buff-menu.elc \
145 $(lispsource)button.elc \ 145 $(lispsource)button.elc \
@@ -178,7 +178,9 @@ lisp= \
178 $(lispsource)international/latin-5.el \ 178 $(lispsource)international/latin-5.el \
179 $(lispsource)international/latin-8.el \ 179 $(lispsource)international/latin-8.el \
180 $(lispsource)international/latin-9.el \ 180 $(lispsource)international/latin-9.el \
181 $(lispsource)case-table.elc \ 181 $(lispsource)case-table.elc
182
183lisp2 = \
182 $(lispsource)language/chinese.elc \ 184 $(lispsource)language/chinese.elc \
183 $(lispsource)language/cyrillic.elc \ 185 $(lispsource)language/cyrillic.elc \
184 $(lispsource)language/indian.elc \ 186 $(lispsource)language/indian.elc \
@@ -228,7 +230,8 @@ DOC = DOC
228$(DOC): make-docfile 230$(DOC): make-docfile
229 - $(DEL) $(DOC) 231 - $(DEL) $(DOC)
230 "$(THISDIR)/$(BLD)/make-docfile" -o $(DOC) -d ../src $(obj) 232 "$(THISDIR)/$(BLD)/make-docfile" -o $(DOC) -d ../src $(obj)
231 "$(THISDIR)/$(BLD)/make-docfile" -a $(DOC) -d ../src $(lisp) 233 "$(THISDIR)/$(BLD)/make-docfile" -a $(DOC) -d ../src $(lisp1)
234 "$(THISDIR)/$(BLD)/make-docfile" -a $(DOC) -d ../src $(lisp2)
232 $(CP) $(DOC) ../etc/DOC-X 235 $(CP) $(DOC) ../etc/DOC-X
233 - mkdir "../src/$(OBJDIR)" 236 - mkdir "../src/$(OBJDIR)"
234 - mkdir "../src/$(OBJDIR)/etc" 237 - mkdir "../src/$(OBJDIR)/etc"
@@ -422,5 +425,3 @@ $(BLD)/timer.$(O) : \
422$(BLD)/yow.$(O) : \ 425$(BLD)/yow.$(O) : \
423 $(SRC)/yow.c \ 426 $(SRC)/yow.c \
424 $(EMACS_ROOT)/lib-src/../src/paths.h 427 $(EMACS_ROOT)/lib-src/../src/paths.h
425
426# arch-tag: c051bc02-a6de-474b-889a-27f7b2fbbcea
diff --git a/lib-src/movemail.c b/lib-src/movemail.c
index 2d0cd9043fd..a634e2966d7 100644
--- a/lib-src/movemail.c
+++ b/lib-src/movemail.c
@@ -216,7 +216,7 @@ main (argc, argv)
216 preserve_mail++; 216 preserve_mail++;
217 break; 217 break;
218 default: 218 default:
219 exit(1); 219 exit (EXIT_FAILURE);
220 } 220 }
221 } 221 }
222 222
@@ -234,7 +234,7 @@ main (argc, argv)
234#else 234#else
235 fprintf (stderr, "Usage: movemail [-p] inbox destfile%s\n", ""); 235 fprintf (stderr, "Usage: movemail [-p] inbox destfile%s\n", "");
236#endif 236#endif
237 exit (1); 237 exit (EXIT_FAILURE);
238 } 238 }
239 239
240 inname = argv[optind]; 240 inname = argv[optind];
@@ -536,12 +536,12 @@ main (argc, argv)
536 if (spool_name) 536 if (spool_name)
537 mailunlock (); 537 mailunlock ();
538#endif 538#endif
539 exit (0); 539 exit (EXIT_SUCCESS);
540 } 540 }
541 541
542 wait (&status); 542 wait (&status);
543 if (!WIFEXITED (status)) 543 if (!WIFEXITED (status))
544 exit (1); 544 exit (EXIT_FAILURE);
545 else if (WRETCODE (status) != 0) 545 else if (WRETCODE (status) != 0)
546 exit (WRETCODE (status)); 546 exit (WRETCODE (status));
547 547
@@ -554,7 +554,7 @@ main (argc, argv)
554 554
555#endif /* ! DISABLE_DIRECT_ACCESS */ 555#endif /* ! DISABLE_DIRECT_ACCESS */
556 556
557 return 0; 557 return EXIT_SUCCESS;
558} 558}
559 559
560#ifdef MAIL_USE_MAILLOCK 560#ifdef MAIL_USE_MAILLOCK
@@ -607,7 +607,7 @@ fatal (s1, s2)
607 if (delete_lockname) 607 if (delete_lockname)
608 unlink (delete_lockname); 608 unlink (delete_lockname);
609 error (s1, s2, 0); 609 error (s1, s2, 0);
610 exit (1); 610 exit (EXIT_FAILURE);
611} 611}
612 612
613/* Print error message. `s1' is printf control string, `s2' and `s3' 613/* Print error message. `s1' is printf control string, `s2' and `s3'
@@ -709,6 +709,8 @@ char Errmsg[200]; /* POP errors, at least, can exceed
709 * If the mailbox is in the form "po:username:hostname", then it is 709 * If the mailbox is in the form "po:username:hostname", then it is
710 * modified by this function -- the second colon is replaced by a 710 * modified by this function -- the second colon is replaced by a
711 * null. 711 * null.
712 *
713 * Return a value suitable for passing to `exit'.
712 */ 714 */
713 715
714int 716int
@@ -736,19 +738,19 @@ popmail (mailbox, outfile, preserve, password, reverse_order)
736 if (! server) 738 if (! server)
737 { 739 {
738 error ("Error connecting to POP server: %s", pop_error, 0); 740 error ("Error connecting to POP server: %s", pop_error, 0);
739 return (1); 741 return EXIT_FAILURE;
740 } 742 }
741 743
742 if (pop_stat (server, &nmsgs, &nbytes)) 744 if (pop_stat (server, &nmsgs, &nbytes))
743 { 745 {
744 error ("Error getting message count from POP server: %s", pop_error, 0); 746 error ("Error getting message count from POP server: %s", pop_error, 0);
745 return (1); 747 return EXIT_FAILURE;
746 } 748 }
747 749
748 if (!nmsgs) 750 if (!nmsgs)
749 { 751 {
750 pop_close (server); 752 pop_close (server);
751 return (0); 753 return EXIT_SUCCESS;
752 } 754 }
753 755
754 mbfi = open (outfile, O_WRONLY | O_CREAT | O_EXCL, 0666); 756 mbfi = open (outfile, O_WRONLY | O_CREAT | O_EXCL, 0666);
@@ -756,7 +758,7 @@ popmail (mailbox, outfile, preserve, password, reverse_order)
756 { 758 {
757 pop_close (server); 759 pop_close (server);
758 error ("Error in open: %s, %s", strerror (errno), outfile); 760 error ("Error in open: %s, %s", strerror (errno), outfile);
759 return (1); 761 return EXIT_FAILURE;
760 } 762 }
761 fchown (mbfi, getuid (), -1); 763 fchown (mbfi, getuid (), -1);
762 764
@@ -766,7 +768,7 @@ popmail (mailbox, outfile, preserve, password, reverse_order)
766 error ("Error in fdopen: %s", strerror (errno), 0); 768 error ("Error in fdopen: %s", strerror (errno), 0);
767 close (mbfi); 769 close (mbfi);
768 unlink (outfile); 770 unlink (outfile);
769 return (1); 771 return EXIT_FAILURE;
770 } 772 }
771 773
772 if (reverse_order) 774 if (reverse_order)
@@ -789,7 +791,7 @@ popmail (mailbox, outfile, preserve, password, reverse_order)
789 { 791 {
790 error (Errmsg, 0, 0); 792 error (Errmsg, 0, 0);
791 close (mbfi); 793 close (mbfi);
792 return (1); 794 return EXIT_FAILURE;
793 } 795 }
794 mbx_delimit_end (mbf); 796 mbx_delimit_end (mbf);
795 fflush (mbf); 797 fflush (mbf);
@@ -798,7 +800,7 @@ popmail (mailbox, outfile, preserve, password, reverse_order)
798 error ("Error in fflush: %s", strerror (errno), 0); 800 error ("Error in fflush: %s", strerror (errno), 0);
799 pop_close (server); 801 pop_close (server);
800 close (mbfi); 802 close (mbfi);
801 return (1); 803 return EXIT_FAILURE;
802 } 804 }
803 } 805 }
804 806
@@ -812,14 +814,14 @@ popmail (mailbox, outfile, preserve, password, reverse_order)
812 if (fsync (mbfi) < 0) 814 if (fsync (mbfi) < 0)
813 { 815 {
814 error ("Error in fsync: %s", strerror (errno), 0); 816 error ("Error in fsync: %s", strerror (errno), 0);
815 return (1); 817 return EXIT_FAILURE;
816 } 818 }
817#endif 819#endif
818 820
819 if (close (mbfi) == -1) 821 if (close (mbfi) == -1)
820 { 822 {
821 error ("Error in close: %s", strerror (errno), 0); 823 error ("Error in close: %s", strerror (errno), 0);
822 return (1); 824 return EXIT_FAILURE;
823 } 825 }
824 826
825 if (! preserve) 827 if (! preserve)
@@ -829,17 +831,17 @@ popmail (mailbox, outfile, preserve, password, reverse_order)
829 { 831 {
830 error ("Error from POP server: %s", pop_error, 0); 832 error ("Error from POP server: %s", pop_error, 0);
831 pop_close (server); 833 pop_close (server);
832 return (1); 834 return EXIT_FAILURE;
833 } 835 }
834 } 836 }
835 837
836 if (pop_quit (server)) 838 if (pop_quit (server))
837 { 839 {
838 error ("Error from POP server: %s", pop_error, 0); 840 error ("Error from POP server: %s", pop_error, 0);
839 return (1); 841 return EXIT_FAILURE;
840 } 842 }
841 843
842 return (0); 844 return EXIT_SUCCESS;
843} 845}
844 846
845int 847int
@@ -957,3 +959,5 @@ strerror (errnum)
957 959
958/* arch-tag: 1c323112-41fe-4fe5-8de9-494de631f73f 960/* arch-tag: 1c323112-41fe-4fe5-8de9-494de631f73f
959 (do not change this comment) */ 961 (do not change this comment) */
962
963/* movemail.c ends here */
diff --git a/lib-src/profile.c b/lib-src/profile.c
index ec77936f74d..8d924532b87 100644
--- a/lib-src/profile.c
+++ b/lib-src/profile.c
@@ -55,7 +55,7 @@ char *
55get_time () 55get_time ()
56{ 56{
57 if (watch_not_started) 57 if (watch_not_started)
58 exit (1); /* call reset_watch first ! */ 58 exit (EXIT_FAILURE); /* call reset_watch first ! */
59 EMACS_GET_TIME (TV2); 59 EMACS_GET_TIME (TV2);
60 EMACS_SUB_TIME (TV2, TV2, TV1); 60 EMACS_SUB_TIME (TV2, TV2, TV1);
61 sprintf (time_string, "%lu.%06lu", (unsigned long)EMACS_SECS (TV2), (unsigned long)EMACS_USECS (TV2)); 61 sprintf (time_string, "%lu.%06lu", (unsigned long)EMACS_SECS (TV2), (unsigned long)EMACS_USECS (TV2));
@@ -94,14 +94,16 @@ main ()
94 puts (get_time ()); 94 puts (get_time ());
95 break; 95 break;
96 case 'q': 96 case 'q':
97 exit (0); 97 exit (EXIT_SUCCESS);
98 } 98 }
99 /* Anything remaining on the line is ignored. */ 99 /* Anything remaining on the line is ignored. */
100 while (c != '\n' && c != EOF) 100 while (c != '\n' && c != EOF)
101 c = getchar (); 101 c = getchar ();
102 } 102 }
103 exit (1); 103 exit (EXIT_FAILURE);
104} 104}
105 105
106/* arch-tag: 8db68f7e-2322-4944-a315-dba349bdbf39 106/* arch-tag: 8db68f7e-2322-4944-a315-dba349bdbf39
107 (do not change this comment) */ 107 (do not change this comment) */
108
109/* profile.c ends here */
diff --git a/lib-src/rcs2log b/lib-src/rcs2log
index b7466b6c134..42c92ff6187 100755
--- a/lib-src/rcs2log
+++ b/lib-src/rcs2log
@@ -2,34 +2,57 @@
2 2
3# RCS to ChangeLog generator 3# RCS to ChangeLog generator
4 4
5# Generate a change log prefix from RCS files (perhaps in the CVS repository) 5Help='
6# and the ChangeLog (if any). 6Generate ChangeLog entries from RCS files (perhaps in a CVS repository)
7# Output the new prefix to standard output. 7and the ChangeLog file (if any). An RCS file typically has a name
8# You can edit this prefix by hand, and then prepend it to ChangeLog. 8ending in ",v", and represents the entire history of a file that is
9under revision control. The ChangeLog file logs entries for changes,
10in reverse chronological order.
9 11
10# Ignore log entries that start with `#'. 12Generate entries for changes entered into RCS (or CVS) more recently
11# Clump together log entries that start with `{topic} ', 13than the newest existing entry in the ChangeLog file. You can then
12# where `topic' contains neither white space nor `}'. 14edit these entries by hand, and prepend them to the ChangeLog file.
15
16Output the resulting ChangeLog entries to standard output.
17Each entry looks something like this:
18
192004-04-17 Paul Eggert <eggert@gnu.org>
20
21 * rcs2log (Help): Clarify wording of the usage message.
22 Problem reported by Alan Mackenzie in
23 <http://mail.gnu.org/archive/html/bug-gnu-emacs/2004-04/msg00188.html>.
24
25ChangeLog entries contain the current date, full name, email address
26including hostname, the name of the affected file, and commentary.
27RCS and CVS logs lack full names and email addresses, so they are
28inferred from login names using a heuristic that can be overridden
29via the -u option.
30
31Ignore log entries that start with "#".
32Clump together log entries that start with "{topic} ",
33where "topic" contains neither white space nor "}".
34
35If no FILE is specified, use all files under the working directory
36that are maintained under version control.
13 37
14Help='The default FILEs are the files registered under the working directory.
15Options: 38Options:
16 39
17 -c CHANGELOG Output a change log prefix to CHANGELOG (default ChangeLog). 40 -c FILE Output ChangeLog entries for FILE (default ChangeLog).
18 -h HOSTNAME Use HOSTNAME in change log entries (default current host). 41 -h HOSTNAME Use HOSTNAME in change log entries (default current host).
19 -i INDENT Indent change log lines by INDENT spaces (default 8). 42 -i INDENT Indent change log lines by INDENT spaces (default 8).
20 -l LENGTH Try to limit log lines to LENGTH characters (default 79). 43 -l LENGTH Try to limit log lines to LENGTH characters (default 79).
21 -L FILE Use rlog-format FILE for source of logs. 44 -L FILE Use FILE (same format as "rlog") for source of logs.
22 -R If no FILEs are given and RCS is used, recurse through working directory. 45 -R If no FILEs are given and RCS is used, recurse through working directory.
23 -r OPTION Pass OPTION to subsidiary log command. 46 -r OPTION Pass OPTION to subsidiary command (either "rlog" or "cvs -q log").
24 -t TABWIDTH Tab stops are every TABWIDTH characters (default 8). 47 -t TABWIDTH Tab stops are every TABWIDTH characters (default 8).
25 -u "LOGIN<tab>FULLNAME<tab>MAILADDR" Assume LOGIN has FULLNAME and MAILADDR. 48 -u "LOGIN<tab>FULLNAME<tab>EMAILADDR" LOGIN has FULLNAME and EMAILADDR.
26 -v Append RCS revision to file names in log lines. 49 -v Append RCS revision to file names in log lines.
27 --help Output help. 50 --help Output help.
28 --version Output version number. 51 --version Output version number.
29 52
30Report bugs to <bug-gnu-emacs@gnu.org>.' 53Report bugs to <bug-gnu-emacs@gnu.org>.'
31 54
32Id='$Id: rcs2log,v 1.52 2003/12/27 08:18:08 uid65632 Exp $' 55Id='$Id$'
33 56
34# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2001, 2002, 2003, 57# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2001, 2002, 2003,
35# 2004 Free Software Foundation, Inc. 58# 2004 Free Software Foundation, Inc.
diff --git a/lib-src/sorted-doc.c b/lib-src/sorted-doc.c
index 05a3e69cc92..3af3276e811 100644
--- a/lib-src/sorted-doc.c
+++ b/lib-src/sorted-doc.c
@@ -75,7 +75,7 @@ fatal (s1, s2)
75 char *s1, *s2; 75 char *s1, *s2;
76{ 76{
77 error (s1, s2); 77 error (s1, s2);
78 exit (1); 78 exit (EXIT_FAILURE);
79} 79}
80 80
81/* Like malloc but get fatal error if memory is exhausted. */ 81/* Like malloc but get fatal error if memory is exhausted. */
@@ -279,8 +279,10 @@ main ()
279 printf ("@bye\n"); 279 printf ("@bye\n");
280 } 280 }
281 281
282 return 0; 282 return EXIT_SUCCESS;
283} 283}
284 284
285/* arch-tag: ce28f204-1e70-4b34-8210-3d54a5662071 285/* arch-tag: ce28f204-1e70-4b34-8210-3d54a5662071
286 (do not change this comment) */ 286 (do not change this comment) */
287
288/* sorted-doc.c ends here */
diff --git a/lib-src/test-distrib.c b/lib-src/test-distrib.c
index f7b3a8b8004..0333bd7d710 100644
--- a/lib-src/test-distrib.c
+++ b/lib-src/test-distrib.c
@@ -80,13 +80,13 @@ main (argc, argv)
80 if (argc != 2) 80 if (argc != 2)
81 { 81 {
82 fprintf (stderr, "Usage: %s testfile\n", argv[0]); 82 fprintf (stderr, "Usage: %s testfile\n", argv[0]);
83 exit (2); 83 exit (EXIT_FAILURE);
84 } 84 }
85 fd = open (argv[1], O_RDONLY); 85 fd = open (argv[1], O_RDONLY);
86 if (fd < 0) 86 if (fd < 0)
87 { 87 {
88 perror (argv[1]); 88 perror (argv[1]);
89 exit (2); 89 exit (EXIT_FAILURE);
90 } 90 }
91 if (cool_read (fd, buf, sizeof string1) != sizeof string1 || 91 if (cool_read (fd, buf, sizeof string1) != sizeof string1 ||
92 strcmp (buf, string1) || 92 strcmp (buf, string1) ||
@@ -97,14 +97,13 @@ main (argc, argv)
97Most likely this means that many nonprinting characters\n\ 97Most likely this means that many nonprinting characters\n\
98have been corrupted in the files of Emacs, and it will not work.\n", 98have been corrupted in the files of Emacs, and it will not work.\n",
99 argv[1]); 99 argv[1]);
100 exit (2); 100 exit (EXIT_FAILURE);
101 } 101 }
102 close (fd); 102 close (fd);
103#ifdef VMS 103 return EXIT_SUCCESS;
104 exit (1); /* On VMS, success is 1. */
105#endif
106 return (0);
107} 104}
108 105
109/* arch-tag: 3a89005d-df98-4c32-aa9f-33570e16a26a 106/* arch-tag: 3a89005d-df98-4c32-aa9f-33570e16a26a
110 (do not change this comment) */ 107 (do not change this comment) */
108
109/* test-distrib.c ends here */
diff --git a/lib-src/update-game-score.c b/lib-src/update-game-score.c
index 74fa2b06920..8f7c90cad55 100644
--- a/lib-src/update-game-score.c
+++ b/lib-src/update-game-score.c
@@ -111,7 +111,7 @@ lose (msg)
111 const char *msg; 111 const char *msg;
112{ 112{
113 fprintf (stderr, "%s\n", msg); 113 fprintf (stderr, "%s\n", msg);
114 exit (1); 114 exit (EXIT_FAILURE);
115} 115}
116 116
117void lose_syserr P_ ((const char *msg)) NO_RETURN; 117void lose_syserr P_ ((const char *msg)) NO_RETURN;
@@ -138,7 +138,7 @@ lose_syserr (msg)
138 const char *msg; 138 const char *msg;
139{ 139{
140 fprintf (stderr, "%s: %s\n", msg, strerror (errno)); 140 fprintf (stderr, "%s: %s\n", msg, strerror (errno));
141 exit (1); 141 exit (EXIT_FAILURE);
142} 142}
143 143
144char * 144char *
@@ -199,7 +199,7 @@ main (argc, argv)
199 switch (c) 199 switch (c)
200 { 200 {
201 case 'h': 201 case 'h':
202 usage (0); 202 usage (EXIT_SUCCESS);
203 break; 203 break;
204 case 'd': 204 case 'd':
205 user_prefix = optarg; 205 user_prefix = optarg;
@@ -213,11 +213,11 @@ main (argc, argv)
213 max = MAX_SCORES; 213 max = MAX_SCORES;
214 break; 214 break;
215 default: 215 default:
216 usage (1); 216 usage (EXIT_FAILURE);
217 } 217 }
218 218
219 if (optind+3 != argc) 219 if (optind+3 != argc)
220 usage (1); 220 usage (EXIT_FAILURE);
221 221
222 running_suid = (getuid () != geteuid ()); 222 running_suid = (getuid () != geteuid ());
223 223
@@ -266,7 +266,7 @@ main (argc, argv)
266 lose_syserr ("Failed to write scores file"); 266 lose_syserr ("Failed to write scores file");
267 } 267 }
268 unlock_file (scorefile, lockstate); 268 unlock_file (scorefile, lockstate);
269 exit (0); 269 exit (EXIT_SUCCESS);
270} 270}
271 271
272int 272int
@@ -531,3 +531,5 @@ unlock_file (filename, state)
531 531
532/* arch-tag: 2bf5c52e-4beb-463a-954e-c58b9c64736b 532/* arch-tag: 2bf5c52e-4beb-463a-954e-c58b9c64736b
533 (do not change this comment) */ 533 (do not change this comment) */
534
535/* update-game-score.c ends here */
diff --git a/lib-src/yow.c b/lib-src/yow.c
index 10f0fad1ce7..9d58ce5aecb 100644
--- a/lib-src/yow.c
+++ b/lib-src/yow.c
@@ -73,7 +73,7 @@ main (argc, argv)
73 if ((fp = fopen(file, "r")) == NULL) { 73 if ((fp = fopen(file, "r")) == NULL) {
74 fprintf(stderr, "yow: "); 74 fprintf(stderr, "yow: ");
75 perror(file); 75 perror(file);
76 exit(1); 76 exit(EXIT_FAILURE);
77 } 77 }
78 78
79 /* initialize random seed */ 79 /* initialize random seed */
@@ -82,7 +82,7 @@ main (argc, argv)
82 setup_yow(fp); 82 setup_yow(fp);
83 yow(fp); 83 yow(fp);
84 fclose(fp); 84 fclose(fp);
85 return 0; 85 return EXIT_SUCCESS;
86} 86}
87 87
88static long len = -1; 88static long len = -1;
@@ -113,7 +113,7 @@ setup_yow(fp)
113 113
114 if (fseek(fp, 0L, 2) == -1) { 114 if (fseek(fp, 0L, 2) == -1) {
115 perror("yow"); 115 perror("yow");
116 exit(1); 116 exit(EXIT_FAILURE);
117 } 117 }
118 len = ftell(fp) - header_len; 118 len = ftell(fp) - header_len;
119} 119}
@@ -132,7 +132,7 @@ yow (fp)
132 offset = rand() % len + header_len; 132 offset = rand() % len + header_len;
133 if (fseek(fp, offset, 0) == -1) { 133 if (fseek(fp, offset, 0) == -1) {
134 perror("yow"); 134 perror("yow");
135 exit(1); 135 exit(EXIT_FAILURE);
136 } 136 }
137 137
138 /* Read until SEP, read next line, print it. 138 /* Read until SEP, read next line, print it.
@@ -180,3 +180,5 @@ yow (fp)
180 180
181/* arch-tag: e40fc0df-bafb-4001-af24-5c883d1c685e 181/* arch-tag: e40fc0df-bafb-4001-af24-5c883d1c685e
182 (do not change this comment) */ 182 (do not change this comment) */
183
184/* yow.c ends here */