
D:\Programs\doxygen-svn>diff -u src/.svn/text-base/fortranscanner.l.svn-base src/fortranscanner.l 
--- src/.svn/text-base/fortranscanner.l.svn-base	2010-11-06 20:30:55.797632400 +0100
+++ src/fortranscanner.l	2010-11-07 10:09:37.860611400 +0100
@@ -114,6 +114,7 @@
 static int		inputPosition;
 static bool             isFixedForm;
 static QCString         inputStringPrepass; ///< Input string for prepass of line cont. '&'
+static QCString         inputStringSemi; ///< Input string after command separetor ';'
 static unsigned int     inputPositionPrepass;
 static int              lineCountPrepass = 0;
 
@@ -654,6 +655,12 @@
                                           yyLineNr++; yyLineNr+=lineCountPrepass; lineCountPrepass=0;
                                           docBlock.resize(0);
                                         }
+<Variable>";".*"\n"                     { currentModifiers = SymbolModifiers();
+                                          yy_pop_state(); // end variable deklaration list
+                                          docBlock.resize(0);
+                                          inputStringSemi =(const char*)(yytext+1);
+                                          pushBuffer(inputStringSemi);
+                                        }
 
 <Initialization,ArrayInitializer>"(/"   { initializer+=yytext;
                                            initializerArrayScope++;
