diff options
author | Dimitri van Heesch <dimitri@stack.nl> | 2014-12-09 19:55:14 (GMT) |
---|---|---|
committer | Dimitri van Heesch <dimitri@stack.nl> | 2014-12-09 19:55:14 (GMT) |
commit | 03f779ae4552ebbf7c84f2300d8e3dba93e7279f (patch) | |
tree | ed6ce0721ae4e10de6a518868bc92af2a64427ca /src/fortrancode.l | |
parent | b90e7da8c5eaf620eab5d92e340741cb5d9f3464 (diff) | |
parent | b2e9aa362540cae4487e48598fb7e80b8651752f (diff) | |
download | Doxygen-03f779ae4552ebbf7c84f2300d8e3dba93e7279f.zip Doxygen-03f779ae4552ebbf7c84f2300d8e3dba93e7279f.tar.gz Doxygen-03f779ae4552ebbf7c84f2300d8e3dba93e7279f.tar.bz2 |
Merge pull request #258 from albert-github/feature/bug_fortran_source_continuation
Fortran continuation character seen as begin of function call
Diffstat (limited to 'src/fortrancode.l')
-rw-r--r-- | src/fortrancode.l | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/src/fortrancode.l b/src/fortrancode.l index b9648d5..d2f1c42 100644 --- a/src/fortrancode.l +++ b/src/fortrancode.l @@ -990,9 +990,17 @@ PREFIX (RECURSIVE{BS_}|IMPURE{BS_}|PURE{BS_}|ELEMENTAL{BS_}){0,3}(RECURSIVE|I yy_pop_state(); } <Start>{ID}{BS}/"(" { // function call - g_insideBody=TRUE; - generateLink(*g_code, yytext); - g_insideBody=FALSE; + if (g_isFixedForm && yy_my_start == 6) + { + // fixed form continuation line + YY_FTN_REJECT; + } + else + { + g_insideBody=TRUE; + generateLink(*g_code, yytext); + g_insideBody=FALSE; + } } /*-------- comments ---------------------------------------------------*/ |