Commit 03f779ae authored by Dimitri van Heesch's avatar Dimitri van Heesch

Merge pull request #258 from albert-github/feature/bug_fortran_source_continuation

Fortran continuation character seen as begin of function call
parents b90e7da8 b2e9aa36
......@@ -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 ---------------------------------------------------*/
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment