Skip to content

Commit d8a2d37

Browse files
committed
Fixes Modern Fortran 2: inconsistent syntax highlighting #181,
for type-select constructs.
1 parent f777881 commit d8a2d37

File tree

1 file changed

+7
-9
lines changed

1 file changed

+7
-9
lines changed

syntaxes/fortran_free-form.tmLanguage.json

Lines changed: 7 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -1329,18 +1329,16 @@
13291329
}
13301330
]
13311331
},
1332-
"select-type-construct":{
1332+
"select-type-construct": {
13331333
"comment": "Select type construct. Introduced in the Fortran 2003 standard.",
1334-
"begin": "(?i)\\b(select)\\s*(type)\\b",
1334+
"name": "meta.block.select.type.fortran",
1335+
"begin": "(?i)\\b(select\\s*type)\\b",
13351336
"beginCaptures": {
13361337
"1": {
1337-
"name": "keyword.control.select.fortran"
1338-
},
1339-
"2": {
1340-
"name": "keyword.control.type.fortran"
1338+
"name": "keyword.control.selecttype.fortran"
13411339
}
13421340
},
1343-
"end": "(?i)(?=\\b(end\\s*select)\\b)",
1341+
"end": "(?i)\\b(end\\s*select)\\b",
13441342
"endCaptures": {
13451343
"1": {
13461344
"name": "keyword.control.endselect.fortran"
@@ -1351,7 +1349,7 @@
13511349
"include": "#parentheses"
13521350
},
13531351
{
1354-
"begin": "(?i)\\b(?:(class)|(type))",
1352+
"begin": "(?i)\\b(?:(class)|(type))\\b",
13551353
"beginCaptures": {
13561354
"1": {
13571355
"name": "keyword.control.class.fortran"
@@ -1371,7 +1369,7 @@
13711369
}
13721370
},
13731371
{
1374-
"match": "(?i)\\G\\s*(is)\\b",
1372+
"match": "(?i)\\G\\s*\\b(is)\\b",
13751373
"captures": {
13761374
"1": {
13771375
"name": "keyword.control.is.fortran"

0 commit comments

Comments
 (0)