Fixed missing tags for certain initializers [Fortran, Bug #877956].

git-svn-id: svn://svn.code.sf.net/p/ctags/code/trunk@394 c5d04d22-be80-434c-894e-aa346cc9e8e8
This commit is contained in:
darren 2004-02-18 05:27:02 +00:00
parent 4034f2c1bd
commit 97ed10db6b
3 changed files with 56 additions and 2 deletions

1
NEWS
View File

@ -14,6 +14,7 @@ ctags-5.5.3 (Tue Feb 17 2004)
* Fixed spurious tags for for C++ member templtates [C++, Bug #849591].
* Fixed spurious local tags for statements following labels [C].
* Fixed missing tags for certain scoped functions [Vim].
* Fixed missing tags for certain initializers [Fortran, Bug #877956].
ctags-5.5.2 (Wed Sep 17 2003)
* Added tags for local variables for C-based languages [C/C++/C#/Java/Vera,

54
Test/bug877956.f90 Normal file
View File

@ -0,0 +1,54 @@
! Bugs item #877956, was opened at 2004-01-15 17:59
! Message generated for change (Tracker Item Submitted) made by Item Submitter
! You can respond by visiting:
! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=877956&group_id=6556
!
! Category: None
! Group: None
! Status: Open
! Resolution: None
! Priority: 5
! Submitted By: Randy Hood (randy762)
! Assigned to: Nobody/Anonymous (nobody)
! Summary: Broken Fortran variable listing after =-1
!
! Initial Comment:
! When I run ctags v5.5.2 on Redhat Linux 9 with the command
!
! ctags --Fortran-kinds=v -x test.f90
!
! where test.f90 is
! ----------------------------------
PROGRAM test
IMPLICIT NONE
INTEGER :: cm1 =-1, c2 = 2
END PROGRAM test
! -------------------------------------
!
! I only get this one line of output
!
! cm1 variable 4 test.f90 INTEGER :: cm1 =-1, c2 = 2
!
! If I change one line of test.f90 so that it is now
! ----------------------------------------
PROGRAM test
IMPLICIT NONE
INTEGER :: cm1 = -1, c2 = 2
END PROGRAM test
! -----------------------------------------
! and run the command
!
! ctags --Fortran-kinds=v -x test.f90
!
! I get this correct output
!
! c2 variable 4 test.f90 INTEGER :: cm1 = -1, c2 = 2
! cm1 variable 4 test.f90 INTEGER :: cm1 = -1, c2 = 2
!
! ----------------------------------------------------------------------
! You can respond by visiting:
! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=877956&group_id=6556

View File

@ -957,8 +957,7 @@ getNextChar:
case '<':
case '>':
{
const char *const operatorChars = "*/+-=<>";
const char *const operatorChars = "*/+=<>";
do {
vStringPut (token->string, c);
c = getChar ();