github-linguist-grammars 4.6.0

data/grammars/source.fortran.modern.json

@@ -0,0 +1,226 @@
+{
+  "comment": "Specificities of Fortran >= 90",
+  "fileTypes": [
+    "f90",
+    "F90",
+    "f95",
+    "F95",
+    "f03",
+    "F03",
+    "f08",
+    "F08"
+  ],
+  "firstLineMatch": "(?i)-[*]- mode: f90 -[*]-",
+  "keyEquivalent": "^~F",
+  "name": "Fortran - Modern",
+  "patterns": [
+    {
+      "include": "source.fortran"
+    },
+    {
+      "begin": "(?x:\t\t\t\t\t# extended mode\n\t\t\t\t\t^\n\t\t\t\t\t\\s*\t\t\t\t\t# start of line and possibly some space\n\t\t\t\t\t(?i:(interface))\t\t# 1: word interface\n\t\t\t\t\t\\s+\t\t\t\t\t# some space\n\t\t\t\t\t(?i:(operator|assignment))\t\t# 2: the words operator or assignment\n\t\t\t\t\t\\(\t\t\t\t\t# opening parenthesis\n\t\t\t\t\t((\\.[a-zA-Z0-9_]+\\.)|[\\+\\-\\=\\/\\*]+)\t# 3: an operator\n\t\t\t\t\t\n\t\t\t\t\t\\)\t\t\t\t\t# closing parenthesis\n\t\t\t\t\t)",
+      "beginCaptures": {
+        "1": {
+          "name": "storage.type.function.fortran"
+        },
+        "2": {
+          "name": "storage.type.fortran"
+        },
+        "3": {
+          "name": "keyword.operator.fortran"
+        }
+      },
+      "comment": "Interface declaration of operator/assignments",
+      "end": "(?x:\n\t\t\t\t\t((?i:end))\t\t\t# 1: the word end\n\t\t\t\t\t\\s*\t\t\t\t\t# possibly some space\n\t\t\t\t\t((?i:interface)?) \t\t# 2: possibly interface\n\t\t\t\t\t)",
+      "endCaptures": {
+        "1": {
+          "name": "keyword.other.fortran"
+        },
+        "2": {
+          "name": "storage.type.function.fortran"
+        }
+      },
+      "name": "meta.function.interface.operator.fortran.modern",
+      "patterns": [
+        {
+          "include": "$self"
+        }
+      ]
+    },
+    {
+      "begin": "(?x:\t\t\t\t\t# extended mode\n\t\t\t\t\t^\n\t\t\t\t\t\\s*\t\t\t\t\t# start of line and possibly some space\n\t\t\t\t\t(?i:(interface))\t\t# 1: word interface\n\t\t\t\t\t\\s+\t\t\t\t\t# some space\n\t\t\t\t\t([A-Za-z_][A-Za-z0-9_]*)\t# 1: name\n\t\t\t\t\t)",
+      "beginCaptures": {
+        "1": {
+          "name": "storage.type.function.fortran"
+        },
+        "2": {
+          "name": "entity.name.function.fortran"
+        }
+      },
+      "comment": "Interface declaration of function/subroutines",
+      "end": "(?x:\t\t\t\t# extended mode\n\t\t\t\t\t((?i:end))\t\t# 1: the word end\n\t\t\t\t\t\\s*\t\t\t\t# possibly some space\n\t\t\t\t\t((?i:interface)?) \t# 2: possibly interface\n\t\t\t\t\t)",
+      "endCaptures": {
+        "1": {
+          "name": "keyword.other.fortran"
+        },
+        "2": {
+          "name": "storage.type.function.fortran"
+        }
+      },
+      "name": "meta.function.interface.fortran.modern",
+      "patterns": [
+        {
+          "include": "$self"
+        }
+      ]
+    },
+    {
+      "begin": "(?x:\t\t\t# extended mode\n\t\t\t\t\t^\\s*\t\t\t# begining of line and some space\n\t\t\t\t\t(?i:(type))\t# 1: word type\n\t\t\t\t\t\\s+\t\t\t# some space\n\t\t\t\t\t([a-zA-Z_][a-zA-Z0-9_]*)\t# 2: type name\n\t\t\t\t\t)",
+      "beginCaptures": {
+        "1": {
+          "name": "storage.type.fortran.modern"
+        },
+        "2": {
+          "name": "entity.name.type.fortran.modern"
+        }
+      },
+      "comment": "Type definition",
+      "end": "(?x:\n\t\t\t\t\t((?i:end))\t\t\t# 1: the word end\n\t\t\t\t\t\\s*\t\t\t\t\t# possibly some space\n\t\t\t\t\t(?i:(type))? \t\t\t# 2: possibly the word type\n\t\t\t\t\t(\\s+[A-Za-z_][A-Za-z0-9_]*)?\t# 3: possibly the name\n\t\t\t\t\t)",
+      "endCaptures": {
+        "1": {
+          "name": "keyword.other.fortran"
+        },
+        "2": {
+          "name": "storage.type.fortran.modern"
+        },
+        "3": {
+          "name": "entity.name.type.end.fortran.modern"
+        }
+      },
+      "name": "meta.type-definition.fortran.modern",
+      "patterns": [
+        {
+          "include": "$self"
+        }
+      ]
+    },
+    {
+      "begin": "(^[ \\t]+)?(?=!-)",
+      "beginCaptures": {
+        "1": {
+          "name": "punctuation.whitespace.comment.leading.ruby"
+        }
+      },
+      "end": "(?!\\G)",
+      "patterns": [
+        {
+          "begin": "!-",
+          "beginCaptures": {
+            "0": {
+              "name": "punctuation.definition.comment.fortran"
+            }
+          },
+          "end": "\\n",
+          "name": "comment.line.exclamation.mark.fortran.modern",
+          "patterns": [
+            {
+              "match": "\\\\\\s*\\n"
+            }
+          ]
+        }
+      ]
+    },
+    {
+      "begin": "(^[ \\t]+)?(?=!)",
+      "beginCaptures": {
+        "1": {
+          "name": "punctuation.whitespace.comment.leading.ruby"
+        }
+      },
+      "end": "(?!\\G)",
+      "patterns": [
+        {
+          "begin": "!",
+          "beginCaptures": {
+            "0": {
+              "name": "punctuation.definition.comment.fortran"
+            }
+          },
+          "end": "\\n",
+          "name": "comment.line.exclamation.fortran.modern",
+          "patterns": [
+            {
+              "match": "\\\\\\s*\\n"
+            }
+          ]
+        }
+      ]
+    },
+    {
+      "comment": "statements controling the flow of the program",
+      "match": "\\b(?i:(select\\s+case|case(\\s+default)?|end\\s+select|use|(end\\s+)?forall))\\b",
+      "name": "keyword.control.fortran.modern"
+    },
+    {
+      "comment": "input/output instrinsics",
+      "match": "\\b(?i:(access|action|advance|append|apostrophe|asis|blank|delete|delim|direct|end|eor|err|exist|file|fmt|form|formatted|iolength|iostat|keep|name|named|nextrec|new|nml|no|null|number|old|opened|pad|position|quote|read|readwrite|rec|recl|replace|scratch|sequential|size|status|undefined|unformatted|unit|unknown|write|yes|zero|namelist)(?=\\())",
+      "name": "keyword.control.io.fortran.modern"
+    },
+    {
+      "comment": "logical operators in symbolic format",
+      "match": "\\b(\\=\\=|\\/\\=|\\>\\=|\\>|\\<|\\<\\=)\\b",
+      "name": "keyword.operator.logical.fortran.modern"
+    },
+    {
+      "comment": "operators",
+      "match": "(\\%|\\=\\>)",
+      "name": "keyword.operator.fortran.modern"
+    },
+    {
+      "comment": "numeric instrinsics",
+      "match": "\\b(?i:(ceiling|floor|modulo)(?=\\())",
+      "name": "keyword.other.instrinsic.numeric.fortran.modern"
+    },
+    {
+      "comment": "matrix/vector/array instrinsics",
+      "match": "\\b(?i:(allocate|allocated|deallocate)(?=\\())",
+      "name": "keyword.other.instrinsic.array.fortran.modern"
+    },
+    {
+      "comment": "pointer instrinsics",
+      "match": "\\b(?i:(associated)(?=\\())",
+      "name": "keyword.other.instrinsic.pointer.fortran.modern"
+    },
+    {
+      "comment": "programming units",
+      "match": "\\b(?i:((end\\s*)?(interface|procedure|module)))\\b",
+      "name": "keyword.other.programming-units.fortran.modern"
+    },
+    {
+      "begin": "\\b(?i:(type(?=\\s*\\()))\\b(?=.*::)",
+      "beginCaptures": {
+        "1": {
+          "name": "storage.type.fortran.modern"
+        }
+      },
+      "comment": "Line of type specification",
+      "end": "(?=!)|$",
+      "name": "meta.specification.fortran.modern",
+      "patterns": [
+        {
+          "include": "$base"
+        }
+      ]
+    },
+    {
+      "match": "\\b(?i:(type(?=\\s*\\()))\\b",
+      "name": "storage.type.fortran.modern"
+    },
+    {
+      "match": "\\b(?i:(optional|recursive|pointer|allocatable|target|private|public))\\b",
+      "name": "storage.modifier.fortran.modern"
+    }
+  ],
+  "scopeName": "source.fortran.modern",
+  "uuid": "016CA1B6-8351-4B17-9215-29C275D5D973"
+}

data/grammars/source.fsharp.json

@@ -0,0 +1,403 @@
+{
+  "name": "F#",
+  "scopeName": "source.fsharp",
+  "fileTypes": [
+    "fs",
+    "fsx",
+    "fsi"
+  ],
+  "foldingStartMarker": "",
+  "foldingStopMarker": "",
+  "patterns": [
+    {
+      "include": "#comments"
+    },
+    {
+      "include": "#constants"
+    },
+    {
+      "include": "#structure"
+    },
+    {
+      "include": "#attributes"
+    },
+    {
+      "include": "#strings"
+    },
+    {
+      "include": "#chars"
+    },
+    {
+      "include": "#double_tick"
+    },
+    {
+      "include": "#definition"
+    },
+    {
+      "include": "#method_calls"
+    },
+    {
+      "include": "#modules"
+    },
+    {
+      "include": "#anonymous_functions"
+    },
+    {
+      "include": "#keywords"
+    },
+    {
+      "include": "#records"
+    },
+    {
+      "include": "#ces"
+    }
+  ],
+  "repository": {
+    "anonymous_functions": {
+      "patterns": [
+        {
+          "name": "meta.function.anonymous",
+          "begin": "\\b(fun)\\b",
+          "end": "(->)",
+          "beginCaptures": {
+            "1": {
+              "name": "keyword.other.function-definition.fsharp"
+            }
+          },
+          "endCaptures": {
+            "1": {
+              "name": "keyword.other.fsharp"
+            }
+          },
+          "patterns": [
+            {
+              "include": "#variables"
+            }
+          ]
+        }
+      ]
+    },
+    "attributes": {
+      "patterns": [
+        {
+          "name": "support.function.attribute.fsharp",
+          "begin": "\\[\\<",
+          "end": "\\>\\]",
+          "patterns": [
+            {
+              "include": "$self"
+            }
+          ]
+        }
+      ]
+    },
+    "comments": {
+      "patterns": [
+        {
+          "name": "comment.block.fsharp",
+          "begin": "(\\(\\*)",
+          "end": "(\\*\\))",
+          "beginCaptures": {
+            "1": {
+              "name": "comment.block.fsharp"
+            }
+          },
+          "endCaptures": {
+            "1": {
+              "name": "comment.block.fsharp"
+            }
+          }
+        },
+        {
+          "name": "comment.line.double-slash.fsharp",
+          "match": "//.*$"
+        }
+      ]
+    },
+    "constants": {
+      "patterns": [
+        {
+          "name": "constant.language.unit.fsharp",
+          "match": "\\(\\)"
+        },
+        {
+          "name": "constant.numeric.floating-point.fsharp",
+          "match": "\\b-?[0-9][0-9_]*((\\.([0-9][0-9_]*([eE][+-]??[0-9][0-9_]*)?)?)|([eE][+-]??[0-9][0-9_]*))"
+        },
+        {
+          "name": "constant.numeric.integer.nativeint.fsharp",
+          "match": "\\b(-?((0(x|X)[0-9a-fA-F][0-9a-fA-F_]*)|(0(o|O)[0-7][0-7_]*)|(0(b|B)[01][01_]*)|([0-9][0-9_]*)))"
+        },
+        {
+          "name": "constant.others.fsharp",
+          "match": "\\b(true|false|null|unit)\\b"
+        }
+      ]
+    },
+    "definition": {
+      "patterns": [
+        {
+          "name": "meta.binding.fsharp",
+          "begin": "(val mutable|val|let mutable|let|member|static member|override|let!)(\\s+rec|mutable)?(\\s+private|internal|public)?\\s+(\\([^\\s-]*\\)|[_a-zA-Z]([_a-zA-Z0-9,\\.]|(?<=,)\\s)*)",
+          "end": "((``.*``)|(with)|=|$)",
+          "beginCaptures": {
+            "1": {
+              "name": "keyword.other.binding.fsharp"
+            },
+            "2": {
+              "name": "keyword.other.function-recursive.fsharp"
+            },
+            "3": {
+              "name": "keyword.other.access.fsharp"
+            },
+            "4": {
+              "name": "variable.other.binding.fsharp"
+            }
+          },
+          "endCaptures": {
+            "1": {
+              "name": "keyword.other.fsharp"
+            },
+            "2": {
+              "name": "variable.other.binding.fsharp"
+            },
+            "3": {
+              "name": "keyword.other.fsharp"
+            }
+          },
+          "patterns": [
+            {
+              "include": "#variables"
+            }
+          ]
+        }
+      ]
+    },
+    "keywords": {
+      "patterns": [
+        {
+          "name": "keyword.other.fsharp",
+          "match": "\\b(function|yield!|yield|class|match|delegate|of|new|in|as|if|then|else|elif|for|begin|end|inherit|do|let\\!|return\\!|return|interface|with|member|try|finally|and|when|use|use\\!)\\b"
+        },
+        {
+          "name": "meta.preprocessor.fsharp",
+          "begin": "^\\s*#\\s*(light)\\b",
+          "end": "(\\s|$)"
+        },
+        {
+          "name": "keyword.other.fsharp",
+          "match": "(\\|>|\\->|\\<\\-|:>|:\\?>|:|\\[|\\]|\\;|<>|=|@|\\|\\||&&|{|}|\\||_|\\.\\.|\\+|\\-|\\*|\\/|\\^|\\!|\\>|\\>\\=|\\>\\>|\\<|\\<\\=|\\<\\<)"
+        }
+      ]
+    },
+    "modules": {
+      "patterns": [
+        {
+          "name": "entity.name.section.fsharp",
+          "begin": "\\b(namespace|module)(\\s+public|internal|private)?\\s+([a-zA-Z][a-zA-Z0-9'_. ]*)",
+          "end": "(\\s|$)",
+          "beginCaptures": {
+            "1": {
+              "name": "keyword.other.fsharp"
+            },
+            "2": {
+              "name": "keyword.other.fsharp"
+            },
+            "3": {
+              "name": "entity.name.section.fsharp"
+            }
+          },
+          "patterns": [
+            {
+              "name": "entity.name.section.fsharp",
+              "match": "(\\.)([A-Z][a-zA-Z0-9'_]*)",
+              "captures": {
+                "1": {
+                  "name": "punctuation.separator.namespace-reference.fsharp"
+                },
+                "2": {
+                  "name": "entity.name.section.fsharp"
+                }
+              }
+            }
+          ]
+        },
+        {
+          "name": "meta.namespace.open.fsharp",
+          "begin": "\\b(open)\\s+([A-Z][a-zA-Z0-9'_]*)(?=(\\.[A-Z][a-zA-Z0-9_]*)*)",
+          "end": "(\\s|$)",
+          "beginCaptures": {
+            "1": {
+              "name": "keyword.other.fsharp"
+            },
+            "2": {
+              "name": "entity.name.section.fsharp"
+            }
+          },
+          "patterns": [
+            {
+              "name": "entity.name.section.fsharp",
+              "match": "(\\.)([a-zA-Z][a-zA-Z0-9'_]*)",
+              "captures": {
+                "1": {
+                  "name": "punctuation.separator.namespace-reference.fsharp"
+                },
+                "2": {
+                  "name": "entity.name.section.fsharp"
+                }
+              }
+            }
+          ]
+        },
+        {
+          "name": "meta.namespace.alias.fsharp",
+          "begin": "^\\s*(module)\\s+([A-Z][a-zA-Z0-9'_]*)\\s*(=)\\s*([A-Z][a-zA-Z0-9'_]*)",
+          "end": "(\\s|$)",
+          "beginCaptures": {
+            "1": {
+              "name": "keyword.other.namespace-definition.fsharp"
+            },
+            "2": {
+              "name": "entity.name.type.namespace.fsharp"
+            },
+            "3": {
+              "name": "punctuation.separator.namespace-definition.fsharp"
+            },
+            "4": {
+              "name": "entity.name.section.fsharp"
+            }
+          },
+          "patterns": [
+            {
+              "name": "entity.name.section.fsharp",
+              "match": "(\\.)([A-Z][a-zA-Z0-9'_]*)",
+              "captures": {
+                "1": {
+                  "name": "punctuation.separator.namespace-reference.fsharp"
+                },
+                "2": {
+                  "name": "entity.name.section.fsharp"
+                }
+              }
+            }
+          ]
+        }
+      ]
+    },
+    "strings": {
+      "patterns": [
+        {
+          "name": "string.quoted.double.fsharp",
+          "begin": "(?=[^\\\\])(\")",
+          "end": "(\")",
+          "beginCaptures": {
+            "1": {
+              "name": "punctuation.definition.string.begin.fsharp"
+            }
+          },
+          "endCaptures": {
+            "1": {
+              "name": "punctuation.definition.string.end.fsharp"
+            }
+          },
+          "patterns": [
+            {
+              "name": "punctuation.separator.string.ignore-eol.fsharp",
+              "match": "\\\\$[ \\t]*"
+            },
+            {
+              "name": "constant.character.string.escape.fsharp",
+              "match": "\\\\([\\\\''ntbr]|u[a-fA-F0-9]{4}|u[a-fA-F0-9]{8})"
+            },
+            {
+              "name": "invalid.illeagal.character.string.fsharp",
+              "match": "\\\\(?![\\\\''ntbr]|u[a-fA-F0-9]{4}|u[a-fA-F0-9]{8})."
+            }
+          ]
+        }
+      ]
+    },
+    "variables": {
+      "patterns": [
+        {
+          "name": "constant.language.unit.fsharp",
+          "match": "\\(\\)"
+        },
+        {
+          "name": "variable.parameter.fsharp",
+          "match": "[a-zA-Z']\\w*"
+        }
+      ]
+    },
+    "double_tick": {
+      "patterns": [
+        {
+          "name": "variable.other.binding.fsharp",
+          "match": "(``)(.*)(``)",
+          "captures": {
+            "1": {
+              "name": "variable.other.binding.fsharp"
+            },
+            "3": {
+              "name": "string.quoted.single.fsharp"
+            }
+          }
+        }
+      ]
+    },
+    "records": {
+      "patterns": [
+        {
+          "name": "record.fsharp",
+          "match": "(type)[\\s]+(private|internal|public)?[\\s]*([a-zA-Z0-9'<>^:,. ]+)((with)|(=)|(\\(\\)))",
+          "captures": {
+            "1": {
+              "name": "keyword.other.fsharp"
+            },
+            "2": {
+              "name": "keyword.other.fsharp"
+            },
+            "3": {
+              "name": "entity.name.type.fsharp"
+            },
+            "5": {
+              "name": "keyword.other.fsharp"
+            },
+            "6": {
+              "name": "keyword.other.fsharp"
+            },
+            "7": {
+              "name": "constant.language.unit.fsharp"
+            }
+          }
+        }
+      ]
+    },
+    "ces": {
+      "patterns": [
+        {
+          "name": "ce.fsharp",
+          "match": "\\b([a-zA-Z]*\\s+\\{)",
+          "captures": {
+            "1": {
+              "name": "keyword.other.fsharp"
+            }
+          }
+        }
+      ]
+    },
+    "chars": {
+      "patterns": [
+        {
+          "name": "char.fsharp",
+          "match": "('\\\\?.')",
+          "captures": {
+            "1": {
+              "name": "string.quoted.single.fsharp"
+            }
+          }
+        }
+      ]
+    }
+  }
+}