diff options
| -rw-r--r-- | doc/ScintillaHistory.html | 4 | ||||
| -rw-r--r-- | lexers/LexFortran.cxx | 1 |
2 files changed, 5 insertions, 0 deletions
diff --git a/doc/ScintillaHistory.html b/doc/ScintillaHistory.html index 6ff3d6c46..700de78fd 100644 --- a/doc/ScintillaHistory.html +++ b/doc/ScintillaHistory.html @@ -502,6 +502,10 @@ <a href="http://sourceforge.net/p/scintilla/bugs/1719/">Bug #1719</a>. </li> <li> + Fortran folder fixes handling of "selecttype" and "selectcase". + <a href="http://sourceforge.net/p/scintilla/bugs/1724/">Bug #1724</a>. + </li> + <li> Verilog folder folds interface definitions. </li> <li> diff --git a/lexers/LexFortran.cxx b/lexers/LexFortran.cxx index 5deaf1173..387ed84ed 100644 --- a/lexers/LexFortran.cxx +++ b/lexers/LexFortran.cxx @@ -260,6 +260,7 @@ static int classifyFoldPointFortran(const char* s, const char* prevWord, const c lev = 0; } else if (strcmp(s, "associate") == 0 || strcmp(s, "block") == 0 || strcmp(s, "blockdata") == 0 || strcmp(s, "select") == 0 + || strcmp(s, "selecttype") == 0 || strcmp(s, "selectcase") == 0 || strcmp(s, "do") == 0 || strcmp(s, "enum") ==0 || strcmp(s, "function") == 0 || strcmp(s, "interface") == 0 || strcmp(s, "module") == 0 || strcmp(s, "program") == 0 |