Permalink
Browse files

Fix rules for closing FORTRAN module and typedef scopes

  • Loading branch information...
hansec committed Nov 28, 2014
1 parent be933bf commit 7ace28eb7bb5f42c3571e5b7be1ab954f4509e17
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/fortrancode.l
@@ -893,11 +893,11 @@ PREFIX (RECURSIVE{BS_}|IMPURE{BS_}|PURE{BS_}|ELEMENTAL{BS_}){0,3}(RECURSIVE|I
yy_pop_state();
YY_FTN_REJECT;
}
<Start>"end"({BS_}"type").* { // just reset currentClass, rest is done in following rule
<Start>^{BS}"end"({BS_}"type").* { // just reset currentClass, rest is done in following rule
currentClass=0;
YY_FTN_REJECT;
}
<Start>"end"({BS_}"module").* { // just reset currentModule, rest is done in following rule
<Start>^{BS}"end"({BS_}"module").* { // just reset currentModule, rest is done in following rule
currentModule=0;
YY_FTN_REJECT;
}

0 comments on commit 7ace28e

Please sign in to comment.