syntax: highlight Public and Private (#8)

Author: Lukas Neubert

syntaxes/tests/comment.bas

@@ -0,0 +1,11 @@
+' SYNTAX TEST "source.vba" "main syntax test"
+
+  Public Const FOO As Int = 1
+' ^^^^^^ storage.visibility
+
+  ' some comment
+' ^^^^^^^^^^^^^^ comment.line
+
+  Private Sub doStuff()
+' ^^^^^^^ storage.visibility
+End Sub

syntaxes/tests/main.bas

@@ -6,13 +6,18 @@
 		".frm"
 	],
 	"patterns": [
-		{ "include": "#comments" }
+		{ "include": "#comments" },
+		{ "include": "#storage" }
 	],
 	"repository": {
 		"comments": {
 			"name": "comment.line",
 			"begin": "'",
 			"end": "$"
+		},
+		"storage": {
+			"name": "storage.visibility",
+			"match": "\\b(Public|Private)\\b"
 		}
 	}
 }