aboutsummaryrefslogtreecommitdiffstats
path: root/lib-src
diff options
context:
space:
mode:
Diffstat (limited to 'lib-src')
-rw-r--r--lib-src/etags.c24
1 files changed, 13 insertions, 11 deletions
diff --git a/lib-src/etags.c b/lib-src/etags.c
index 536ca567f18..1e66de77a9f 100644
--- a/lib-src/etags.c
+++ b/lib-src/etags.c
@@ -31,7 +31,7 @@ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
31 * Francesco Potorti` (F.Potorti@cnuce.cnr.it) is the current maintainer. 31 * Francesco Potorti` (F.Potorti@cnuce.cnr.it) is the current maintainer.
32 */ 32 */
33 33
34char pot_etags_version[] = "@(#) pot revision number is 11.66"; 34char pot_etags_version[] = "@(#) pot revision number is 11.71";
35 35
36#define TRUE 1 36#define TRUE 1
37#define FALSE 0 37#define FALSE 0
@@ -450,7 +450,9 @@ Fortran is tried first; if no tags are found, C is tried next.");
450void 450void
451print_version () 451print_version ()
452{ 452{
453 printf ("%s for Emacs version %s\n", (CTAGS) ? "ctags" : "etags", VERSION); 453 printf ("%s (GNU Emacs %s)\n", (CTAGS) ? "ctags" : "etags", VERSION);
454 puts ("Copyright (C) 1996 Free Software Foundation, Inc. and Ken Arnold");
455 puts ("This program is distributed under the same terms as Emacs");
454 456
455 exit (GOOD); 457 exit (GOOD);
456} 458}
@@ -549,6 +551,9 @@ are. Relative ones are stored relative to the output file's directory.");
549 551
550 print_language_names (); 552 print_language_names ();
551 553
554 puts ("");
555 puts ("Report bugs to bug-gnu-emacs@prep.ai.mit.edu");
556
552 exit (GOOD); 557 exit (GOOD);
553} 558}
554 559
@@ -947,9 +952,6 @@ main (argc, argv)
947 because we want them ordered. Let's do it now. */ 952 because we want them ordered. Let's do it now. */
948 if (cxref_style) 953 if (cxref_style)
949 { 954 {
950 tagf = fopen (tagfile, append_to_tagfile ? "a" : "w");
951 if (tagf == NULL)
952 pfatal (tagfile);
953 put_entries (head); 955 put_entries (head);
954 exit (GOOD); 956 exit (GOOD);
955 } 957 }
@@ -982,7 +984,7 @@ main (argc, argv)
982 sprintf (cmd, "sort %s -o %s", tagfile, tagfile); 984 sprintf (cmd, "sort %s -o %s", tagfile, tagfile);
983 exit (system (cmd)); 985 exit (system (cmd));
984 } 986 }
985 exit (GOOD); 987 return GOOD;
986} 988}
987 989
988 990
@@ -4106,11 +4108,11 @@ readline_internal (linebuffer, stream)
4106 { 4108 {
4107 *--p = '\0'; 4109 *--p = '\0';
4108#ifdef DOS_NT 4110#ifdef DOS_NT
4109 /* Assume CRLF->LF translation will be performed by Emacs 4111 /* Assume CRLF->LF translation will be performed by Emacs
4110 when loading this file, so CRs won't appear in the buffer. 4112 when loading this file, so CRs won't appear in the buffer.
4111 It would be cleaner to compensate within Emacs; 4113 It would be cleaner to compensate within Emacs;
4112 however, Emacs does not know how many CRs were deleted 4114 however, Emacs does not know how many CRs were deleted
4113 before any given point in the file. */ 4115 before any given point in the file. */
4114 chars_deleted = 1; 4116 chars_deleted = 1;
4115#else 4117#else
4116 chars_deleted = 2; 4118 chars_deleted = 2;