From 17c5b6160d013d118296663e133cf8884c74a939 Mon Sep 17 00:00:00 2001
From: albert-github <albert.tests@gmail.com>
Date: Sun, 9 Mar 2014 19:45:05 +0100
Subject: [PATCH] Bug 643618 - Fortran: variable with name "type" confuses
 Doxygen

Most problems were solved in version 1.8.5 but the underscore character (_) had not been incorporated, this is done with this patch.
---
 src/fortranscanner.l | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fortranscanner.l b/src/fortranscanner.l
index 623f587a797..aa59bf0548f 100644
--- a/src/fortranscanner.l
+++ b/src/fortranscanner.l
@@ -567,7 +567,7 @@ SCOPENAME ({ID}{BS}"::"{BS})*
 
  /*------- type definition  -------------------------------------------------------------------------------*/
 
-<Start,ModuleBody>^{BS}type/[^a-z0-9]    {
+<Start,ModuleBody>^{BS}type/[^a-z0-9_]   {
                                           if(YY_START == Start)
                                           {
                                             addModule(NULL);