Index: fortranscanner.l
===================================================================
RCS file: /cygdrive/d/cvs_doxygen/doxygen/doxygen/src/fortranscanner.l,v
retrieving revision 1.5
diff -u -r1.5 fortranscanner.l
--- fortranscanner.l	12 Aug 2012 12:06:56 -0000	1.5
+++ fortranscanner.l	26 Aug 2012 17:13:20 -0000
@@ -858,7 +858,7 @@
 					  updateVariablePrepassComment(yyColNr-yyleng, yyColNr);
 					}
 <Variable>{BS}"="                       { yy_push_state(YY_START);
-                                          initializer="";
+                                          initializer="=";
                                           initializerScope = initializerArrayScope = 0;
 					  BEGIN(Initialization);
                                         }
