Index: src/fortranscanner.l
===================================================================
--- src/fortranscanner.l	(revision 799)
+++ src/fortranscanner.l	(working copy)
@@ -868,14 +868,16 @@
 <Variable>";".*"\n"                     { currentModifiers = SymbolModifiers();
                                           yy_pop_state(); // end variable declaration list
                                           docBlock.resize(0);
-                                          inputStringSemi =(const char*)(yytext+1);
+                                          inputStringSemi =(const char*)(QCString(" \n") + QCString(yytext+1)).data();
+                                          yyLineNr--;
                                           pushBuffer(inputStringSemi);
                                         }
 <*>";".*"\n"                            {
 					  if (YY_START == Variable) REJECT; // Just be on the safe side
                                           if (YY_START == String) REJECT; // ";" ignored in strings
                                           if (YY_START == StrIgnore) REJECT; // ";" ignored in regular comments
-                                          inputStringSemi =(const char*)(yytext+1);
+                                          inputStringSemi =(const char*)(QCString(" \n") + QCString(yytext+1)).data();
+                                          yyLineNr--;
                                           pushBuffer(inputStringSemi);
                                         }
 
