Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!cs.utexas.edu!ut-emx!mclay
From: mclay@ut-emx.UUCP (Robert McLay)
Newsgroups: gnu.utils.bug
Subject: etags.c bug and fix
Message-ID: <15810@ut-emx.UUCP>
Date: 28 Jul 89 04:11:40 GMT
Reply-To: mclay@emx.utexas.edu (Robert McLay)
Distribution: gnu.utils.bug
Organization: UTexas Dept of ASE/EM, Austin, Texas
Lines: 29

There is a bug in etags.c.  The problem is that etags fails to try fortran
tags for file names with a name like 'file.cs'.  The comment for
trying fortran is correct, but the if test is not.  This etags.c is from Gnu
Emacs version 18.52.

Robert McLay
mclay@emx.utexas.edu
________________________________________________________________________
*** etags.c	Sun Sep 11 18:42:37 1988
--- etags.new	Thu Jul 27 22:23:28 1989
***************
*** 534,541 ****
        return;
      }
    /* if not a .c or .h or .y file, try fortran */
!   if (cp && (cp[1] != 'c' && cp[1] != 'h' && cp[1] != 'y')
!       && cp[2] == '\0')
      {
        if (PF_funcs(inf) != 0)
  	{
--- 534,541 ----
        return;
      }
    /* if not a .c or .h or .y file, try fortran */
!   if (cp && ( (cp[1] != 'c' && cp[1] != 'h' && cp[1] != 'y')
! 	     || cp[2] != '\0'))
      {
        if (PF_funcs(inf) != 0)
  	{