diff options
author | Dimitri van Heesch <dimitri@stack.nl> | 2015-01-01 15:31:46 (GMT) |
---|---|---|
committer | Dimitri van Heesch <dimitri@stack.nl> | 2015-01-01 15:31:46 (GMT) |
commit | daaeeece0ffe70325888b55c0e87a9e64a498b87 (patch) | |
tree | 151128fe78a095ba6fe4a8ac0db6483e77022298 | |
parent | 7361e656b7395be7367f1dd8e18e5baf10ed19c8 (diff) | |
parent | 25a90990662449808c5ba58c243a7835d13ba750 (diff) | |
download | Doxygen-daaeeece0ffe70325888b55c0e87a9e64a498b87.zip Doxygen-daaeeece0ffe70325888b55c0e87a9e64a498b87.tar.gz Doxygen-daaeeece0ffe70325888b55c0e87a9e64a498b87.tar.bz2 |
Merge pull request #275 from albert-github/feature/bug_source_fortran_function
Fortran FUNCTION source code
-rw-r--r-- | src/fortranscanner.l | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l index f628c26..1ffd987 100644 --- a/src/fortranscanner.l +++ b/src/fortranscanner.l @@ -988,6 +988,8 @@ private { result=result.stripWhiteSpace(); addSubprogram(result); BEGIN(Subprog); + current->bodyLine = yyLineNr + lineCountPrepass + 1; // we have to be at the line after the definition and we have to take continuation lines into account. + current->startLine = yyLineNr; } <Start,ModuleBody,SubprogBody,InterfaceBody,ModuleBodyContains,SubprogBodyContains>^{BS}({PREFIX}{BS_})?{SUBPROG}{BS_} { |