diff options
-rw-r--r-- | src/fortrancode.l | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fortrancode.l b/src/fortrancode.l index 699b320..e6cfdde 100644 --- a/src/fortrancode.l +++ b/src/fortrancode.l @@ -932,7 +932,7 @@ PREFIX (RECURSIVE{BS_}|IMPURE{BS_}|PURE{BS_}|ELEMENTAL{BS_}){0,3}(RECURSIVE|I endFontClass(); } <Declaration>{ID} { // local var - if (g_currentMemberDef && !g_currentMemberDef->isFunction() && bracketCount==0) + if (g_currentMemberDef && g_currentMemberDef->isFunction() && bracketCount==0) { g_code->codify(yytext); addLocalVar(yytext); |