diff options
author | Dimitri van Heesch <doxygen@gmail.com> | 2020-03-27 21:34:22 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2020-03-27 21:34:22 (GMT) |
commit | 39bdf31966fccdb8ab0bffb929c6d0a9a5894cb1 (patch) | |
tree | 741dcc0cf1627a7d228a71fdc0d9edbf8b3380c9 /src | |
parent | 2dfbc6ae6d718cadae022aad0da310263e3d9d8d (diff) | |
parent | f4a10139c6652a122912754ccc0b453e703c92bf (diff) | |
download | Doxygen-39bdf31966fccdb8ab0bffb929c6d0a9a5894cb1.zip Doxygen-39bdf31966fccdb8ab0bffb929c6d0a9a5894cb1.tar.gz Doxygen-39bdf31966fccdb8ab0bffb929c6d0a9a5894cb1.tar.bz2 |
Merge pull request #7669 from albert-github/feature/bug_ftn_fixed
Incorrect determination of fixed form Fortran
Diffstat (limited to 'src')
-rw-r--r-- | src/fortranscanner.l | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l index df4941d..852c4d9 100644 --- a/src/fortranscanner.l +++ b/src/fortranscanner.l @@ -1496,7 +1496,6 @@ void truncatePrepass(yyscan_t yyscanner,int index) } // simplified way to know if this is fixed form -// duplicate in fortrancode.l bool recognizeFixedForm(const char* contents, FortranFormat format) { int column=0; @@ -1532,7 +1531,7 @@ bool recognizeFixedForm(const char* contents, FortranFormat format) break; default: if (skipLine) break; - if (column==7) return TRUE; + if (column>=7) return TRUE; return FALSE; } } |