diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/fortranscanner.l | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l index 4983738..f34ff69 100644 --- a/src/fortranscanner.l +++ b/src/fortranscanner.l @@ -910,15 +910,14 @@ private { /*---- documentation comments --------------------------------------------------------------------*/ -<Variable>"!<" { /* backward docu comment (only one line) */ +<Variable,SubprogBody,ModuleBody,TypedefBody>"!<" { /* backward docu comment (only one line) */ if (v_type != V_IGNORE) { - yy_push_state(YY_START); current->docLine = yyLineNr; docBlockJavaStyle = FALSE; docBlock.resize(0); docBlockJavaStyle = Config_getBool("JAVADOC_AUTOBRIEF"); startCommentBlock(TRUE); - BEGIN(DocBackLine); + yy_push_state(DocBackLine); } } <DocBackLine>.* { // contents of current comment line @@ -932,7 +931,7 @@ private { } else if (v_type == V_PARAMETER) { - parameter->docs=docBlock; + parameter->docs+=docBlock; } yy_pop_state(); } |