summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authoralbert-github <albert.tests@gmail.com>2017-11-18 17:41:27 (GMT)
committeralbert-github <albert.tests@gmail.com>2017-11-18 17:41:27 (GMT)
commit6f7264f4a16f5b1240291c6d33a0e4cc98ba30e4 (patch)
treec3db0fd7056bc5dd97480631d9a8bfd666cc5d1c
parentd8001efd89146e04d92f5ea41ab27a7de09b6c53 (diff)
downloadDoxygen-6f7264f4a16f5b1240291c6d33a0e4cc98ba30e4.zip
Doxygen-6f7264f4a16f5b1240291c6d33a0e4cc98ba30e4.tar.gz
Doxygen-6f7264f4a16f5b1240291c6d33a0e4cc98ba30e4.tar.bz2
Code color of , (comma) together with only in use statement
The comma was colored as part of the word only (keywordtype), this should not be the case.
-rw-r--r--src/fortrancode.l16
1 files changed, 8 insertions, 8 deletions
diff --git a/src/fortrancode.l b/src/fortrancode.l
index 1f22700..141e762 100644
--- a/src/fortrancode.l
+++ b/src/fortrancode.l
@@ -774,6 +774,13 @@ PREFIX (RECURSIVE{BS_}|IMPURE{BS_}|PURE{BS_}|ELEMENTAL{BS_}){0,3}(RECURSIVE|I
yy_push_state(YY_START);
BEGIN(Use);
}
+<Use>"ONLY" { // TODO: rename
+ startFontClass("keywordtype");
+ codifyLines(yytext);
+ endFontClass();
+ yy_push_state(YY_START);
+ BEGIN(UseOnly);
+ }
<Use>{ID} {
QCString tmp = yytext;
tmp = tmp.lower();
@@ -790,14 +797,7 @@ PREFIX (RECURSIVE{BS_}|IMPURE{BS_}|PURE{BS_}|ELEMENTAL{BS_}){0,3}(RECURSIVE|I
useMembers->append(tmp, useEntry);
addUse(tmp);
}
-<Use>,{BS}"ONLY" { // TODO: rename
- startFontClass("keywordtype");
- codifyLines(yytext);
- endFontClass();
- yy_push_state(YY_START);
- BEGIN(UseOnly);
- }
-<UseOnly,Import>{BS},{BS} { codifyLines(yytext); }
+<Use,UseOnly,Import>{BS},{BS} { codifyLines(yytext); }
<UseOnly,Import>{BS}&{BS}"\n" { codifyLines(yytext);
g_contLineNr++;
YY_FTN_RESET}