--- src/fortranscanner.l	(revision 783)
+++ src/fortranscanner.l	(working copy)
@@ -53,6 +53,8 @@
 #include <qfile.h>
 #include <qmap.h>
   
+#include "bufstr.h"
+#include "commentcnv.h"
 #include "fortranscanner.h"
 #include "entry.h"
 #include "message.h"
@@ -1038,8 +1040,17 @@
                                           //cout << "start DocBlock " << endl;
 					}
 
-<DocBlock>.*    			{ // contents of current comment line
-                                          docBlock+=yytext;
+<DocBlock>.*    			{ // contents of current comment line converted because of ALIASES
+                                          BufStr myI(1024);  // hopefully long enough
+                                          BufStr myO(1024);  // hopefully long enough
+                                          myI.addArray("/*!",3);
+                                          myI.addArray(yytext,strlen(yytext));
+                                          myI.addArray("*/",2);
+                                          convertCppComments(&myI,&myO,current->fileName);
+                                          myO.dropFromStart(3);
+                                          myO.shrink(myO.curPos()-2);
+                                          myO.addChar('\0');
+                                          docBlock+=myO.data();
   					}
 <DocBlock>"\n"{BS}"!"(">"|"!"+)		{ // comment block (next line is also comment line)
 					  docBlock+="\n"; // \n is necessary for lists
