Skip to content

Commit 926f913

Browse files
Merge pull request #112
Fix Select Case highlight
2 parents a693a15 + a56ae37 commit 926f913

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

syntaxes/fortran_free-form.tmLanguage.json

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1278,7 +1278,7 @@
12781278
"patterns": [
12791279
{
12801280
"name": "meta.block.select.fortran",
1281-
"begin": "(?i)\\b(select)\\b",
1281+
"begin": "(?i)\\b(select\\s*case|selectcase)\\b",
12821282
"beginCaptures": {
12831283
"1": {
12841284
"name": "keyword.control.select.fortran"
@@ -1293,7 +1293,7 @@
12931293
"patterns": [
12941294
{
12951295
"comment": "Select case construct. Introduced in the Fortran 1990 standard.",
1296-
"begin": "(?i)\\G\\s*\\b(case)\\b",
1296+
"begin": "(?i)^\\s*\\b(case)\\b",
12971297
"beginCaptures": {
12981298
"1": {
12991299
"name": "keyword.control.case.fortran"

0 commit comments

Comments
 (0)