@codingame/monaco-editor-wrapper 3.4.1 → 3.4.2

package/dist/ocaml.interface.js

@@ -1,114 +1,292 @@
-var autoClosingPairs = [
+var name = "OCaml Interface";
+var scopeName = "source.ocaml.interface";
+var fileTypes = [
+	"mli",
+	"eliomi"
+];
+var patterns = [
 	{
-		open: "{",
-		close: "}"
+		include: "source.ocaml#directives"
 	},
 	{
-		open: "[",
-		close: "]"
+		include: "source.ocaml#comments"
 	},
 	{
-		open: "(",
-		close: ")"
+		include: "source.ocaml#attributes"
 	},
 	{
-		open: "\"",
-		close: "\"",
-		notIn: [
-			"string"
-		]
+		include: "source.ocaml#extensions"
 	},
 	{
-		open: "(*",
-		close: "*",
-		notIn: [
-			"string"
-		]
+		include: "#bindings"
 	},
 	{
-		open: "[|",
-		close: "|",
-		notIn: [
-			"string"
-		]
-	}
-];
-var brackets = [
-	[
-		"{",
-		"}"
-	],
-	[
-		"[",
-		"]"
-	],
-	[
-		"(",
-		")"
-	],
-	[
-		"[|",
-		"|]"
-	]
-];
-var comments = {
-	blockComment: [
-		"(*",
-		"*)"
-	]
-};
-var surroundingPairs = [
-	[
-		"{",
-		"}"
-	],
-	[
-		"[",
-		"]"
-	],
-	[
-		"(",
-		")"
-	],
-	[
-		"'",
-		"'"
-	],
-	[
-		"\"",
-		"\""
-	]
-];
-var indentationRules = {
-	decreaseIndentPattern: "^\\s*(end|done|with|in|else)\\b|^\\s*;;",
-	increaseIndentPattern: "\\b(begin|object)\\s*$|\\blet [a-zA-Z0-9_-]+( [^ ]+)* =\\s*$|method!?[ \\t]+.*=[ \\t]*$|->[ \\t]*$|\\b(for|while)(_lwt)?[ \\t]+.*[ \\t]+do[ \\t]*$|(\\btry(_lwt)?$|\\bif\\s+.*\\sthen$|\\belse|[:=]\\s*sig|=\\s*struct)\\s*$",
-	indentNextLinePattern: "(?!\\bif.*then.*(else.*|(;|[ \\t]in)[ \\t]*$))\\bif|\\bthen[ \\t]*$|\\belse[ \\t]*$$"
-};
-var onEnterRules = [
+		include: "source.ocaml#operators"
+	},
+	{
+		include: "#keywords"
+	},
 	{
-		beforeText: "\\(\\*\\*",
-		afterText: "\\*\\)",
-		action: {
-			indent: "none",
-			appendText: "    "
-		}
+		include: "source.ocaml#types"
 	},
 	{
-		beforeText: "\\(\\*",
-		afterText: "\\*\\)",
-		action: {
-			indent: "none",
-			appendText: "   "
-		}
+		include: "source.ocaml#identifiers"
 	}
 ];
+var repository = {
+	bindings: {
+		comment: "bindings that are shared between .ml and .mli syntaxes",
+		patterns: [
+			{
+				comment: "optional labeled argument",
+				name: "variable.parameter.optional.ocaml",
+				match: "\\?([[:lower:]_][[:word:]']*)?"
+			},
+			{
+				comment: "labeled argument",
+				name: "variable.parameter.labeled.ocaml",
+				match: "~([[:lower:]_][[:word:]']*)?"
+			},
+			{
+				comment: "type declaration",
+				match: "\\b(type)[[:space:]]+(nonrec[[:space:]]+)?(_[[:space:]]+|[+-]?'[[:alpha:]][[:word:]']*[[:space:]]+|\\(.*\\)[[:space:]]+)?([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						patterns: [
+							{
+								include: "$base"
+							}
+						]
+					},
+					"4": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "and declaration for let bindings, type declarations, class bindings, class type definitions, or module constraints",
+				match: "\\b(and)[[:space:]]+(?!(?:module|type|lazy)\\b(?!'))(virtual[[:space:]]+)?(_[[:space:]]+|'[[:alpha:]][[:word:]']*[[:space:]]+|\\(.*\\)[[:space:]]+)?([[:lower:]_][[:word:]']*)(?![[:word:]'])[[:space:]]*(?!,|::|[[:space:]])",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						patterns: [
+							{
+								include: "$base"
+							}
+						]
+					},
+					"4": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "external declaration",
+				begin: "\\b(external)[[:space:]]+([[:lower:]_][[:word:]']*)?",
+				beginCaptures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				},
+				end: "(?<=]|\")[[:space:]]*(?:$|(?=]))",
+				patterns: [
+					{
+						comment: "string literal",
+						name: "string.quoted.double.ocaml",
+						begin: "\"",
+						end: "\""
+					},
+					{
+						include: "$base"
+					}
+				]
+			},
+			{
+				comment: "val declaration for class instance variables",
+				match: "\\b(val)[[:space:]]+(virtual)[[:space:]]+(mutable)[[:space:]]+([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						name: "keyword.ocaml"
+					},
+					"4": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "val declaration for let bindings or class instance variables",
+				match: "\\b(val|val!)[[:space:]]+(mutable[[:space:]]+)?(virtual[[:space:]]+)?([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						name: "keyword.ocaml"
+					},
+					"4": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "class method declaration",
+				match: "\\b(method)[[:space:]]+(virtual)[[:space:]]+(private)[[:space:]]+([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						name: "keyword.ocaml"
+					},
+					"4": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "class method declaration",
+				match: "\\b(method|method!)[[:space:]]+(private[[:space:]]+)?(virtual[[:space:]]+)?([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						name: "keyword.ocaml"
+					},
+					"4": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "class specification or class type definition with type parameters",
+				match: "\\b(class)[[:space:]]*([[:space:]]+type)?([[:space:]]+virtual)?[[:space:]]*(\\[.*\\])[[:space:]]*([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						name: "keyword.ocaml"
+					},
+					"4": {
+						patterns: [
+							{
+								include: "$base"
+							}
+						]
+					},
+					"5": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "class specification or class type definition",
+				match: "\\b(class)[[:space:]]+(type[[:space:]]+)?(virtual[[:space:]]+)?([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						name: "keyword.ocaml"
+					},
+					"4": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "named self in object",
+				match: "\\b(object)[[:space:]]*\\([[:space:]]*([[:lower:]_][[:word:]']*)",
+				captures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "entity.name.function.binding.ocaml"
+					}
+				}
+			},
+			{
+				comment: "module type of",
+				begin: "\\b(module)[[:space:]]+(type)[[:space:]]+(of)\\b",
+				beginCaptures: {
+					"1": {
+						name: "keyword.ocaml"
+					},
+					"2": {
+						name: "keyword.ocaml"
+					},
+					"3": {
+						name: "keyword.ocaml"
+					}
+				},
+				end: "(?=val|external|type|exception|class|module|open|include|=)",
+				patterns: [
+					{
+						include: "source.ocaml"
+					}
+				]
+			}
+		]
+	},
+	keywords: {
+		patterns: [
+			{
+				comment: "reserved ocaml keyword (in interfaces)",
+				name: "keyword.other.ocaml.interface",
+				match: "\\b(and|as|class|constraint|end|exception|external|functor|in|include|inherit|let[[:space:]]+open|method|module|mutable|nonrec|object|of|open|private|rec|sig|type|val|virtual|with)\\b(?!')"
+			}
+		]
+	}
+};
+var information_for_contributors = [
+	"This file has been converted from https://github.com/ocamllabs/vscode-ocaml-platform/blob/master/",
+	"If you want to provide a fix or improvement, please create a pull request against the original repository.",
+	"Once accepted there, we are happy to receive an update request."
+];
 var ocaml_interface = {
-	autoClosingPairs: autoClosingPairs,
-	brackets: brackets,
-	comments: comments,
-	surroundingPairs: surroundingPairs,
-	indentationRules: indentationRules,
-	onEnterRules: onEnterRules
+	name: name,
+	scopeName: scopeName,
+	fileTypes: fileTypes,
+	patterns: patterns,
+	repository: repository,
+	information_for_contributors: information_for_contributors
 };
 
-export { autoClosingPairs, brackets, comments, ocaml_interface as default, indentationRules, onEnterRules, surroundingPairs };
+export { ocaml_interface as default, fileTypes, information_for_contributors, name, patterns, repository, scopeName };