diff options
| author | Dimitri van Heesch <dimitri@stack.nl> | 2016-01-02 16:51:08 (GMT) |
|---|---|---|
| committer | Dimitri van Heesch <dimitri@stack.nl> | 2016-01-02 16:51:08 (GMT) |
| commit | 89123a2debb57b0a78cf33ac8ee7aa72720d4eca (patch) | |
| tree | 252be3c88f872f171d98416d64847c27136365a7 | |
| parent | 295a467a2ebee260d95c7bb3e3c616554b7782b1 (diff) | |
| parent | 661991e55f7ae18e8143733f364d9d7864ec66d9 (diff) | |
| download | Doxygen-89123a2debb57b0a78cf33ac8ee7aa72720d4eca.zip Doxygen-89123a2debb57b0a78cf33ac8ee7aa72720d4eca.tar.gz Doxygen-89123a2debb57b0a78cf33ac8ee7aa72720d4eca.tar.bz2 | |
Merge pull request #436 from albert-github/feature/Fortran_inline_and_crash
Fortran inline source code and crash on Linux
| -rw-r--r-- | src/fortranscanner.l | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l index bd1fe83..1e29bf6 100644 --- a/src/fortranscanner.l +++ b/src/fortranscanner.l @@ -686,9 +686,12 @@ private { // in a scope of their own, even if multiple // are group in one INTERFACE/END INTERFACE block. // - last_entry->endBodyLine = yyLineNr - 1; if (ifType == IF_ABSTRACT || ifType == IF_SPECIFIC) + { endScope(current_root); + last_entry->endBodyLine = yyLineNr - 1; + } + current_root->endBodyLine = yyLineNr - 1; if (!endScope(current_root)) yyterminate(); |