ada top-level property

Mode ada

Implementation

final ada = Mode(
    refs: {
      '~contains~6~contains~2': Mode(
          begin: "\\s+:\\s+",
          end: "\\s*(:=|;|\\)|=>|\$)",
          illegal: "[]\\{\\}%#'\"",
          contains: [
            Mode(beginKeywords: "loop for declare others", endsParent: true),
            Mode(
                className: "keyword",
                beginKeywords:
                    "not null constant access function procedure in out aliased exception"),
            Mode(
                className: "type",
                begin: "[A-Za-z](_?[A-Za-z0-9.])*",
                endsParent: true,
                relevance: 0)
          ]),
      '~contains~0': Mode(scope: "comment", begin: "--", end: "\$", contains: [
        Mode(
            scope: "doctag",
            begin: "[ ]*(?=(TODO|FIXME|NOTE|BUG|OPTIMIZE|HACK|XXX):)",
            end: "(TODO|FIXME|NOTE|BUG|OPTIMIZE|HACK|XXX):",
            excludeBegin: true,
            relevance: 0),
        Mode(
            begin:
                "[ ]+((?:I|a|is|so|us|to|at|if|in|it|on|[A-Za-z]+['](d|ve|re|ll|t|s|n)|[A-Za-z]+[-][a-z]+|[A-Za-z][a-z]{2,})[.]?[:]?([.][ ]|[ ])){3}")
      ]),
    },
    name: "Ada",
    case_insensitive: true,
    keywords: {
      "keyword": [
        "abort",
        "else",
        "new",
        "return",
        "abs",
        "elsif",
        "not",
        "reverse",
        "abstract",
        "end",
        "accept",
        "entry",
        "select",
        "access",
        "exception",
        "of",
        "separate",
        "aliased",
        "exit",
        "or",
        "some",
        "all",
        "others",
        "subtype",
        "and",
        "for",
        "out",
        "synchronized",
        "array",
        "function",
        "overriding",
        "at",
        "tagged",
        "generic",
        "package",
        "task",
        "begin",
        "goto",
        "pragma",
        "terminate",
        "body",
        "private",
        "then",
        "if",
        "procedure",
        "type",
        "case",
        "in",
        "protected",
        "constant",
        "interface",
        "is",
        "raise",
        "use",
        "declare",
        "range",
        "delay",
        "limited",
        "record",
        "when",
        "delta",
        "loop",
        "rem",
        "while",
        "digits",
        "renames",
        "with",
        "do",
        "mod",
        "requeue",
        "xor"
      ],
      "literal": ["True", "False"]
    },
    contains: [
      Mode(ref: '~contains~0'),
      Mode(
          className: "string",
          begin: "\"",
          end: "\"",
          contains: [Mode(begin: "\"\"", relevance: 0)]),
      Mode(className: "string", begin: "'.'"),
      Mode(
          className: "number",
          begin:
              "\\b(\\d(_|\\d)*#\\w+(\\.\\w+)?#([eE][-+]?\\d(_|\\d)*)?|\\d(_|\\d)*(\\.\\d(_|\\d)*)?([eE][-+]?\\d(_|\\d)*)?)",
          relevance: 0),
      Mode(className: "symbol", begin: "'[A-Za-z](_?[A-Za-z0-9.])*"),
      Mode(
          className: "title",
          begin: "(\\bwith\\s+)?(\\bprivate\\s+)?\\bpackage\\s+(\\bbody\\s+)?",
          end: "(is|\$)",
          keywords: "package body",
          excludeBegin: true,
          excludeEnd: true,
          illegal: "[]\\{\\}%#'\""),
      Mode(
          begin: "(\\b(with|overriding)\\s+)?\\b(function|procedure)\\s+",
          end: "(\\bis|\\bwith|\\brenames|\\)\\s*;)",
          keywords: "overriding function procedure with is renames return",
          returnBegin: true,
          contains: [
            Mode(ref: '~contains~0'),
            Mode(
                className: "title",
                begin: "(\\bwith\\s+)?\\b(function|procedure)\\s+",
                end: "(\\(|\\s+|\$)",
                excludeBegin: true,
                excludeEnd: true,
                illegal: "[]\\{\\}%#'\""),
            Mode(ref: '~contains~6~contains~2'),
            Mode(
                className: "type",
                begin: "\\breturn\\s+",
                end: "(\\s+|;|\$)",
                keywords: "return",
                excludeBegin: true,
                excludeEnd: true,
                endsParent: true,
                illegal: "[]\\{\\}%#'\"")
          ]),
      Mode(
          className: "type",
          begin: "\\b(sub)?type\\s+",
          end: "\\s+",
          keywords: "type",
          excludeBegin: true,
          illegal: "[]\\{\\}%#'\""),
      Mode(ref: '~contains~6~contains~2')
    ]);