Add enumeration type

Author: ZedThree

grammar.js

@@ -493,6 +493,7 @@ module.exports = grammar({
       $.public_statement,
       $.private_statement,
       $.enum,
+      $.enumeration_type,
       $.interface,
       $.derived_type_definition,
       seq($.namelist_statement, $._end_of_statement),
@@ -1623,6 +1624,21 @@ module.exports = grammar({
       $.language_binding
     ),
 
+    enumeration_type: $ => seq(
+      $.enumeration_type_statement,
+      repeat($.enumerator_statement),
+      $.end_enumeration_type_statement,
+      $._end_of_statement
+    ),
+
+    enumeration_type_statement: $ => seq(
+      caseInsensitive('enumeration'),
+      caseInsensitive('type'),
+      optional(seq(',', $.access_specifier)),
+      optional('::'),
+      $._type_name,
+    ),
+
     enumerator_statement: $ => seq(
       caseInsensitive('enumerator'),
       optional('::'),
@@ -1633,6 +1649,12 @@ module.exports = grammar({
     ),
 
     end_enum_statement: $ => whiteSpacedKeyword('end', 'enum'),
+    end_enumeration_type_statement: $ => seq(
+      caseInsensitive('end'),
+      caseInsensitive('enumeration'),
+      caseInsensitive('type'),
+      optional($._name)
+    ),
 
     // precedence is used to override a conflict with the complex literal
     unit_identifier: $ => prec(1, choice(

src/grammar.json

@@ -9019,6 +9019,10 @@
             "type": "SYMBOL",
             "name": "enum"
           },
+          {
+            "type": "SYMBOL",
+            "name": "enumeration_type"
+          },
           {
             "type": "SYMBOL",
             "name": "interface"
@@ -16609,6 +16613,90 @@
         }
       ]
     },
+    "enumeration_type": {
+      "type": "SEQ",
+      "members": [
+        {
+          "type": "SYMBOL",
+          "name": "enumeration_type_statement"
+        },
+        {
+          "type": "REPEAT",
+          "content": {
+            "type": "SYMBOL",
+            "name": "enumerator_statement"
+          }
+        },
+        {
+          "type": "SYMBOL",
+          "name": "end_enumeration_type_statement"
+        },
+        {
+          "type": "SYMBOL",
+          "name": "_end_of_statement"
+        }
+      ]
+    },
+    "enumeration_type_statement": {
+      "type": "SEQ",
+      "members": [
+        {
+          "type": "ALIAS",
+          "content": {
+            "type": "PATTERN",
+            "value": "[eE][nN][uU][mM][eE][rR][aA][tT][iI][oO][nN]"
+          },
+          "named": false,
+          "value": "enumeration"
+        },
+        {
+          "type": "ALIAS",
+          "content": {
+            "type": "PATTERN",
+            "value": "[tT][yY][pP][eE]"
+          },
+          "named": false,
+          "value": "type"
+        },
+        {
+          "type": "CHOICE",
+          "members": [
+            {
+              "type": "SEQ",
+              "members": [
+                {
+                  "type": "STRING",
+                  "value": ","
+                },
+                {
+                  "type": "SYMBOL",
+                  "name": "access_specifier"
+                }
+              ]
+            },
+            {
+              "type": "BLANK"
+            }
+          ]
+        },
+        {
+          "type": "CHOICE",
+          "members": [
+            {
+              "type": "STRING",
+              "value": "::"
+            },
+            {
+              "type": "BLANK"
+            }
+          ]
+        },
+        {
+          "type": "SYMBOL",
+          "name": "_type_name"
+        }
+      ]
+    },
     "enumerator_statement": {
       "type": "SEQ",
       "members": [
@@ -16723,6 +16811,50 @@
       "named": false,
       "value": "endenum"
     },
+    "end_enumeration_type_statement": {
+      "type": "SEQ",
+      "members": [
+        {
+          "type": "ALIAS",
+          "content": {
+            "type": "PATTERN",
+            "value": "[eE][nN][dD]"
+          },
+          "named": false,
+          "value": "end"
+        },
+        {
+          "type": "ALIAS",
+          "content": {
+            "type": "PATTERN",
+            "value": "[eE][nN][uU][mM][eE][rR][aA][tT][iI][oO][nN]"
+          },
+          "named": false,
+          "value": "enumeration"
+        },
+        {
+          "type": "ALIAS",
+          "content": {
+            "type": "PATTERN",
+            "value": "[tT][yY][pP][eE]"
+          },
+          "named": false,
+          "value": "type"
+        },
+        {
+          "type": "CHOICE",
+          "members": [
+            {
+              "type": "SYMBOL",
+              "name": "_name"
+            },
+            {
+              "type": "BLANK"
+            }
+          ]
+        }
+      ]
+    },
     "unit_identifier": {
       "type": "PREC",
       "value": 1,