* lib-src/etags.c (Fortran_functions): Handle "elemental" functions.

This commit is contained in:
Glenn Morris 2011-09-07 00:28:05 -07:00
parent d0417b4cfa
commit 0f054abcec
2 changed files with 7 additions and 0 deletions

View file

@ -1,3 +1,7 @@
2011-09-07 Glenn Morris <rgm@gnu.org>
* etags.c (Fortran_functions): Handle "elemental" functions.
2011-09-07 Dieter Schuster <didischuster@arcor.de> (tiny change)
* etags.c (Fortran_functions): Handle "pure" functions. (Bug#9359)

View file

@ -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':