Keep utf8 characters together in comments

Analogous to the fortrancode (#10728) also do this in the fortranscanner.
doxygen · Mar 12, 2024 · 53614a3 · 53614a3
1 parent c55f070
commit 53614a3
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/fortranscanner.l b/src/fortranscanner.l
@@ -445,6 +445,7 @@ FILEMASK  {VFILEMASK}|{HFILEMASK}
                                           }
                                           pop_state(yyscanner);
                                         }
+<String>[\x80-\xFF]*                    |
 <String>.                               { if (yy_top_state(yyscanner) == Initialization ||
                                               yy_top_state(yyscanner) == ArrayInitializer)
                                           {
@@ -485,6 +486,7 @@ FILEMASK  {VFILEMASK}|{HFILEMASK}
 <StrIgnore>.?/\n                        { pop_state(yyscanner); // comment ends with endline character
                                           DBG_CTX((stderr,"end comment %d %s\n",yyextra->lineNr,qPrint(yyextra->debugStr)));
                                         } // comment line ends
+<StrIgnore>[\x80-\xFF]*                 |
 <StrIgnore>.                            { yyextra->debugStr+=yytext; }