diff options
| author | Glenn Morris <[email protected]> | 2011-09-07 00:28:05 -0700 |
|---|---|---|
| committer | Glenn Morris <[email protected]> | 2011-09-07 00:28:05 -0700 |
| commit | 0f054abcece17599955b8ee34b4f8d7eec134a70 (patch) | |
| tree | 815ce1427dfe562c1dc60a5703d9d23c612264f2 /lib-src | |
| parent | d0417b4cfa7db8073880949a744599e4cbcf26da (diff) | |
* lib-src/etags.c (Fortran_functions): Handle "elemental" functions.
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/ChangeLog | 4 | ||||
| -rw-r--r-- | lib-src/etags.c | 3 |
2 files changed, 7 insertions, 0 deletions
diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog index af026b6ba2..984c4d6c88 100644 --- a/lib-src/ChangeLog +++ b/lib-src/ChangeLog @@ -1,3 +1,7 @@ +2011-09-07 Glenn Morris <[email protected]> + + * etags.c (Fortran_functions): Handle "elemental" functions. + 2011-09-07 Dieter Schuster <[email protected]> (tiny change) * etags.c (Fortran_functions): Handle "pure" functions. (Bug#9359) diff --git a/lib-src/etags.c b/lib-src/etags.c index 0197bbd49c..ac5ebee9b0 100644 --- a/lib-src/etags.c +++ b/lib-src/etags.c @@ -4051,6 +4051,9 @@ Fortran_functions (FILE *inf) if (LOOKING_AT_NOCASE (dbp, "pure")) dbp = skip_spaces (dbp); + if (LOOKING_AT_NOCASE (dbp, "elemental")) + dbp = skip_spaces (dbp); + switch (lowcase (*dbp)) { case 'i': |