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-08 21:13:08.266919800 +0100
@@ -696,7 +705,7 @@
 		                           // TYPE_SPEC is for old function style function result
                                            result= yytext;
                                            result= result.stripWhiteSpace();
-                                           extractPrefix(result);
+                                           //extractPrefix(result);
                                            //fprintf(stderr, "===%s\n", (const char*)result);
   					   current->type = result;
                                            yy_push_state(SubprogPrefix);
@@ -712,7 +721,7 @@
                                          // Fortran subroutine or function found
                                          result= yytext;
                                          result= result.stripWhiteSpace();
-                                         extractPrefix(result);
+                                         //extractPrefix(result);
                                          addSubprogram(result);
                                          yy_push_state(Subprog);
                                        }
