Merge commit 'be3e8236086165e5e45a5a10783823874b3f3ebd' as 'lib/vscode'

lib/vscode/extensions/vb/.vscodeignore

@@ -0,0 +1,2 @@
+test/**
+cgmanifest.json

lib/vscode/extensions/vb/cgmanifest.json

@@ -0,0 +1,32 @@
+{
+	"registrations": [
+		{
+			"component": {
+				"type": "git",
+				"git": {
+					"name": "textmate/asp.vb.net.tmbundle",
+					"repositoryUrl": "https://github.com/textmate/asp.vb.net.tmbundle",
+					"commitHash": "72d44550b3286d0382d7be0624140cf97857ff69"
+				}
+			},
+			"licenseDetail": [
+				"Copyright (c) textmate-asp.vb.net.tmbundle project authors",
+				"",
+				"If not otherwise specified (see below), files in this folder fall under the following license: ",
+				"",
+				"Permission to copy, use, modify, sell and distribute this",
+				"software is granted. This software is provided \"as is\" without",
+				"express or implied warranty, and with no claim as to its",
+				"suitability for any purpose.",
+				"",
+				"An exception is made for files in readable text which contain their own license information, ",
+				"or files where an accompanying file exists (in the same directory) with a \"-license\" suffix added ",
+				"to the base-name name of the original file, and an extension of txt, html, or similar. For example ",
+				"\"tidy\" is accompanied by \"tidy-license.txt\"."
+			],
+			"license": "TextMate Bundle License",
+			"version": "0.0.0"
+		}
+	],
+	"version": 1
+}

lib/vscode/extensions/vb/language-configuration.json

@@ -0,0 +1,30 @@
+{
+	"comments": {
+		"lineComment": "'"
+	},
+	"brackets": [
+		["{", "}"],
+		["[", "]"],
+		["(", ")"],
+		["<", ">"]
+	],
+	"autoClosingPairs": [
+		["{", "}"],
+		["[", "]"],
+		["(", ")"],
+		{ "open": "\"", "close": "\"", "notIn": ["string"] }
+	],
+	"surroundingPairs": [
+		["{", "}"],
+		["[", "]"],
+		["(", ")"],
+		["\"", "\""],
+		["<", ">"]
+	],
+	"folding": {
+		"markers": {
+			"start": "^\\s*#Region\\b",
+			"end": "^\\s*#End Region\\b"
+		}
+	}
+}

lib/vscode/extensions/vb/package.json

@@ -0,0 +1,29 @@
+{
+	"name": "vb",
+	"displayName": "%displayName%",
+	"description": "%description%",
+	"version": "1.0.0",
+	"publisher": "vscode",
+	"license": "MIT",
+	"engines": { "vscode": "*" },
+	"scripts": {
+		"update-grammar": "node ../../build/npm/update-grammar.js textmate/asp.vb.net.tmbundle Syntaxes/ASP%20VB.net.plist ./syntaxes/asp-vb-net.tmlanguage.json"
+	},
+	"contributes": {
+		"languages": [{
+			"id": "vb",
+			"extensions": [ ".vb", ".brs", ".vbs", ".bas" ],
+			"aliases": [ "Visual Basic", "vb" ],
+			"configuration": "./language-configuration.json"
+		}],
+		"grammars": [{
+			"language": "vb",
+			"scopeName": "source.asp.vb.net",
+			"path": "./syntaxes/asp-vb-net.tmlanguage.json"
+		}],
+		"snippets": [{
+			"language": "vb",
+			"path": "./snippets/vb.code-snippets"
+		}]
+	}
+}

lib/vscode/extensions/vb/package.nls.json

@@ -0,0 +1,4 @@
+{
+	"displayName": "Visual Basic Language Basics",
+	"description": "Provides snippets, syntax highlighting, bracket matching and folding in Visual Basic files."
+}

lib/vscode/extensions/vb/snippets/vb.code-snippets

@@ -0,0 +1,86 @@
+{
+	"For Next Loop": {
+		"prefix": "for",
+		"body": [
+			"For ${1:index} As ${2:ObjectType} = ${3:lower} To ${4:Upper}",
+			"\t$0",
+			"Next ${1:index}"
+		],
+		"description": "For Next Loop"
+	},
+	"For Each...Next": {
+		"prefix": "fore",
+		"body": [
+			"For Each ${1:Variable} As ${2:ObjectType} In ${3:Collection}",
+			"\t$0",
+			"Next"
+		],
+		"description": "For Each...Next"
+	},
+	"For i...Next i": {
+		"prefix": "fori",
+		"body": [
+			"For i As ${1:Integer} = ${2:Lower} To ${3:Upper}",
+			"\t$0",
+			"Next i"
+		],
+		"description": "For i...Next i"
+	},
+	"For j...Next j": {
+		"prefix": "forj",
+		"body": [
+			"For j As ${1:Integer} = ${2:Lower} To ${3:Upper}",
+			"\t$0",
+			"Next j"
+		],
+		"description": "For j...Next j"
+	},
+	"Public Function...": {
+		"prefix": "pf",
+		"body": [
+			"Public Function ${1:FunctionName}(${2:ParameterList}) As ${3:ReturnType}",
+			"\tTry",
+			"\t\t$0",
+			"\tCatch ex As Exception",
+			"\tEnd Try",
+			"\tReturn ${3:ReturnValue}",
+			"End Function"
+		],
+		"description": "Public Function..."
+	},
+	"Public Sub ...": {
+		"prefix": "ps",
+		"body": [
+			"Public Sub ${1:ProcedureName}(${2:ParameterList})",
+			"\tTry",
+			"\t\t$0",
+			"\tCatch ex As Exception",
+			"\tEnd Try",
+			"End Sub"
+		],
+		"description": "Public Sub ..."
+	},
+	"While ... End While": {
+		"prefix": "while",
+		"body": [
+			"While ${1:Boolean}",
+			"\t$0",
+			"End While"
+		],
+		"description": "While ... End While"
+	},
+	"Region Start": {
+		"prefix": "#Region",
+		"body": [
+			"#Region $0"
+		],
+		"description": "Folding Region Start"
+	},
+	"Region End": {
+		"prefix": "#End Region",
+		"body": [
+			"#End Region"
+		],
+		"description": "Folding Region End"
+	}
+}

lib/vscode/extensions/vb/syntaxes/asp-vb-net.tmlanguage.json

@@ -0,0 +1,238 @@
+{
+	"information_for_contributors": [
+		"This file has been converted from https://github.com/textmate/asp.vb.net.tmbundle/blob/master/Syntaxes/ASP%20VB.net.plist",
+		"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."
+	],
+	"version": "https://github.com/textmate/asp.vb.net.tmbundle/commit/72d44550b3286d0382d7be0624140cf97857ff69",
+	"name": "ASP vb.NET",
+	"scopeName": "source.asp.vb.net",
+	"comment": "Modified from the original ASP bundle. Originally modified by Thomas Aylott subtleGradient.com",
+	"patterns": [
+		{
+			"match": "\\n",
+			"name": "meta.ending-space"
+		},
+		{
+			"include": "#round-brackets"
+		},
+		{
+			"begin": "^(?=\\t)",
+			"end": "(?=[^\\t])",
+			"name": "meta.leading-space",
+			"patterns": [
+				{
+					"captures": {
+						"1": {
+							"name": "meta.odd-tab.tabs"
+						},
+						"2": {
+							"name": "meta.even-tab.tabs"
+						}
+					},
+					"match": "(\\t)(\\t)?"
+				}
+			]
+		},
+		{
+			"begin": "^(?= )",
+			"end": "(?=[^ ])",
+			"name": "meta.leading-space",
+			"patterns": [
+				{
+					"captures": {
+						"1": {
+							"name": "meta.odd-tab.spaces"
+						},
+						"2": {
+							"name": "meta.even-tab.spaces"
+						}
+					},
+					"match": "(  )(  )?"
+				}
+			]
+		},
+		{
+			"captures": {
+				"1": {
+					"name": "storage.type.function.asp"
+				},
+				"2": {
+					"name": "entity.name.function.asp"
+				},
+				"3": {
+					"name": "punctuation.definition.parameters.asp"
+				},
+				"4": {
+					"name": "variable.parameter.function.asp"
+				},
+				"5": {
+					"name": "punctuation.definition.parameters.asp"
+				}
+			},
+			"match": "^\\s*((?i:function|sub))\\s*([a-zA-Z_]\\w*)\\s*(\\()([^)]*)(\\)).*\\n?",
+			"name": "meta.function.asp"
+		},
+		{
+			"begin": "(^[ \\t]+)?(?=')",
+			"beginCaptures": {
+				"1": {
+					"name": "punctuation.whitespace.comment.leading.asp"
+				}
+			},
+			"end": "(?!\\G)",
+			"patterns": [
+				{
+					"begin": "'",
+					"beginCaptures": {
+						"0": {
+							"name": "punctuation.definition.comment.asp"
+						}
+					},
+					"end": "\\n",
+					"name": "comment.line.apostrophe.asp"
+				}
+			]
+		},
+		{
+			"match": "(?i:\\b(If|Then|Else|ElseIf|Else If|End If|While|Wend|For|To|Each|Case|Select|End Select|Return|Continue|Do|Until|Loop|Next|With|Exit Do|Exit For|Exit Function|Exit Property|Exit Sub|IIf)\\b)",
+			"name": "keyword.control.asp"
+		},
+		{
+			"match": "(?i:\\b(Mod|And|Not|Or|Xor|as)\\b)",
+			"name": "keyword.operator.asp"
+		},
+		{
+			"captures": {
+				"1": {
+					"name": "storage.type.asp"
+				},
+				"2": {
+					"name": "variable.other.bfeac.asp"
+				},
+				"3": {
+					"name": "meta.separator.comma.asp"
+				}
+			},
+			"match": "(?i:(dim)\\s*(?:(\\b[a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?\\b)\\s*(,?)))",
+			"name": "variable.other.dim.asp"
+		},
+		{
+			"match": "(?i:\\s*\\b(Call|Class|Const|Dim|Redim|Function|Sub|Private Sub|Public Sub|End Sub|End Function|End Class|End Property|Public Property|Private Property|Set|Let|Get|New|Randomize|Option Explicit|On Error Resume Next|On Error GoTo)\\b\\s*)",
+			"name": "storage.type.asp"
+		},
+		{
+			"match": "(?i:\\b(Private|Public|Default)\\b)",
+			"name": "storage.modifier.asp"
+		},
+		{
+			"match": "(?i:\\s*\\b(Empty|False|Nothing|Null|True)\\b)",
+			"name": "constant.language.asp"
+		},
+		{
+			"begin": "\"",
+			"beginCaptures": {
+				"0": {
+					"name": "punctuation.definition.string.begin.asp"
+				}
+			},
+			"end": "\"",
+			"endCaptures": {
+				"0": {
+					"name": "punctuation.definition.string.end.asp"
+				}
+			},
+			"name": "string.quoted.double.asp",
+			"patterns": [
+				{
+					"match": "\"\"",
+					"name": "constant.character.escape.apostrophe.asp"
+				}
+			]
+		},
+		{
+			"captures": {
+				"1": {
+					"name": "punctuation.definition.variable.asp"
+				}
+			},
+			"match": "(\\$)[a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?\\b\\s*",
+			"name": "variable.other.asp"
+		},
+		{
+			"match": "(?i:\\b(Application|ObjectContext|Request|Response|Server|Session)\\b)",
+			"name": "support.class.asp"
+		},
+		{
+			"match": "(?i:\\b(Contents|StaticObjects|ClientCertificate|Cookies|Form|QueryString|ServerVariables)\\b)",
+			"name": "support.class.collection.asp"
+		},
+		{
+			"match": "(?i:\\b(TotalBytes|Buffer|CacheControl|Charset|ContentType|Expires|ExpiresAbsolute|IsClientConnected|PICS|Status|ScriptTimeout|CodePage|LCID|SessionID|Timeout)\\b)",
+			"name": "support.constant.asp"
+		},
+		{
+			"match": "(?i:\\b(Lock|Unlock|SetAbort|SetComplete|BinaryRead|AddHeader|AppendToLog|BinaryWrite|Clear|End|Flush|Redirect|Write|CreateObject|HTMLEncode|MapPath|URLEncode|Abandon|Convert|Regex)\\b)",
+			"name": "support.function.asp"
+		},
+		{
+			"match": "(?i:\\b(Application_OnEnd|Application_OnStart|OnTransactionAbort|OnTransactionCommit|Session_OnEnd|Session_OnStart)\\b)",
+			"name": "support.function.event.asp"
+		},
+		{
+			"match": "(?i:(?<=as )(\\b[a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?\\b))",
+			"name": "support.type.vb.asp"
+		},
+		{
+			"match": "(?i:\\b(Array|Add|Asc|Atn|CBool|CByte|CCur|CDate|CDbl|Chr|CInt|CLng|Conversions|Cos|CreateObject|CSng|CStr|Date|DateAdd|DateDiff|DatePart|DateSerial|DateValue|Day|Derived|Math|Escape|Eval|Exists|Exp|Filter|FormatCurrency|FormatDateTime|FormatNumber|FormatPercent|GetLocale|GetObject|GetRef|Hex|Hour|InputBox|InStr|InStrRev|Int|Fix|IsArray|IsDate|IsEmpty|IsNull|IsNumeric|IsObject|Item|Items|Join|Keys|LBound|LCase|Left|Len|LoadPicture|Log|LTrim|RTrim|Trim|Maths|Mid|Minute|Month|MonthName|MsgBox|Now|Oct|Remove|RemoveAll|Replace|RGB|Right|Rnd|Round|ScriptEngine|ScriptEngineBuildVersion|ScriptEngineMajorVersion|ScriptEngineMinorVersion|Second|SetLocale|Sgn|Sin|Space|Split|Sqr|StrComp|String|StrReverse|Tan|Time|Timer|TimeSerial|TimeValue|TypeName|UBound|UCase|Unescape|VarType|Weekday|WeekdayName|Year)\\b)",
+			"name": "support.function.vb.asp"
+		},
+		{
+			"match": "-?\\b((0(x|X)[0-9a-fA-F]*)|(([0-9]+\\.?[0-9]*)|(\\.[0-9]+))((e|E)(\\+|-)?[0-9]+)?)(L|l|UL|ul|u|U|F|f)?\\b",
+			"name": "constant.numeric.asp"
+		},
+		{
+			"match": "(?i:\\b(vbtrue|vbfalse|vbcr|vbcrlf|vbformfeed|vblf|vbnewline|vbnullchar|vbnullstring|int32|vbtab|vbverticaltab|vbbinarycompare|vbtextcomparevbsunday|vbmonday|vbtuesday|vbwednesday|vbthursday|vbfriday|vbsaturday|vbusesystemdayofweek|vbfirstjan1|vbfirstfourdays|vbfirstfullweek|vbgeneraldate|vblongdate|vbshortdate|vblongtime|vbshorttime|vbobjecterror|vbEmpty|vbNull|vbInteger|vbLong|vbSingle|vbDouble|vbCurrency|vbDate|vbString|vbObject|vbError|vbBoolean|vbVariant|vbDataObject|vbDecimal|vbByte|vbArray)\\b)",
+			"name": "support.type.vb.asp"
+		},
+		{
+			"captures": {
+				"1": {
+					"name": "entity.name.function.asp"
+				}
+			},
+			"match": "(?i:(\\b[a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?\\b)(?=\\(\\)?))",
+			"name": "support.function.asp"
+		},
+		{
+			"match": "(?i:((?<=(\\+|=|-|\\&|\\\\|/|<|>|\\(|,))\\s*\\b([a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?)\\b(?!(\\(|\\.))|\\b([a-zA-Z_x7f-xff][a-zA-Z0-9_x7f-xff]*?)\\b(?=\\s*(\\+|=|-|\\&|\\\\|/|<|>|\\(|\\)))))",
+			"name": "variable.other.asp"
+		},
+		{
+			"match": "!|\\$|%|&|\\*|\\-\\-|\\-|\\+\\+|\\+|~|===|==|=|!=|!==|<=|>=|<<=|>>=|>>>=|<>|<|>|!|&&|\\|\\||\\?\\:|\\*=|/=|%=|\\+=|\\-=|&=|\\^=|\\b(in|instanceof|new|delete|typeof|void)\\b",
+			"name": "keyword.operator.js"
+		}
+	],
+	"repository": {
+		"round-brackets": {
+			"begin": "\\(",
+			"beginCaptures": {
+				"0": {
+					"name": "punctuation.section.round-brackets.begin.asp"
+				}
+			},
+			"end": "\\)",
+			"endCaptures": {
+				"0": {
+					"name": "punctuation.section.round-brackets.end.asp"
+				}
+			},
+			"name": "meta.round-brackets",
+			"patterns": [
+				{
+					"include": "source.asp.vb.net"
+				}
+			]
+		}
+	}
+}

lib/vscode/extensions/vb/test/colorize-fixtures/test.vb

@@ -0,0 +1,25 @@
+' Copyright (c) Microsoft Corporation. All rights reserved.
+
+Public Sub LongTask(ByVal Duration As Single, _
+                     ByVal MinimumInterval As Single)
+   Dim Threshold As Single
+   Dim Start As Single
+   Dim blnCancel As Boolean
+
+   ' The Timer property of the DateAndTime object returns the seconds
+   ' and milliseconds that have passed since midnight.
+   Start = CSng(Timer)
+   Threshold = MinimumInterval
+
+   Do While CSng(Timer)< (Start + Duration)
+       ' In a real application, some unit of work would
+       ' be done here each time through the loop.
+       If CSng(Timer)> (Start + Threshold) Then
+              RaiseEvent PercentDone( _
+              Threshold / Duration, blnCancel)
+              ' Check to see if the operation was canceled.
+              If blnCancel Then Exit Sub
+              Threshold = Threshold + MinimumInterval
+       End If
+     Loop
+End Sub