Autohotkey: Improved tag pattern (#2920)

tests/languages/autohotkey/issue2911.test

@@ -0,0 +1,43 @@
+A.invert({1:"a", 2:"A"})
+; => {"a":2}
+
+NormalLabel:
+; do something
+return
+	TabbedLabel:
+	; do something
+	return
+Sus{}//[]Label:
+; do something
+return
+
+----------------------------------------------------
+
+[
+	"A",
+	["operator", "."],
+	["function", "invert"],
+	["punctuation", "("],
+	["punctuation", "{"],
+	["number", "1"],
+	["punctuation", ":"],
+	["string", "\"a\""],
+	["punctuation", ","],
+	["number", "2"],
+	["punctuation", ":"],
+	["string", "\"A\""],
+	["punctuation", "}"],
+	["punctuation", ")"],
+
+	["comment", "; => {\"a\":2}"],
+
+	["tag", "NormalLabel"], ["punctuation", ":"],
+	["comment", "; do something"],
+	["selector", "return"],
+	["tag", "TabbedLabel"], ["punctuation", ":"],
+	["comment", "; do something"],
+	["selector", "return"],
+	["tag", "Sus{}//[]Label"], ["punctuation", ":"],
+	["comment", "; do something"],
+	["selector", "return"]
+]

tests/languages/autohotkey/tag_feature.test

@@ -1,15 +1,25 @@
 foo:
 foo_bar:
 
+validLabel: ; a comment
+/* multiline comment
+*/ validLabel:
+
 ----------------------------------------------------
 
 [
-	["tag", "foo"],
+	["tag", "foo"], ["punctuation", ":"],
+	["tag", "foo_bar"], ["punctuation", ":"],
+
+	["tag", "validLabel"],
 	["punctuation", ":"],
-	["tag", "foo_bar"],
+	["comment", "; a comment"],
+
+	["comment", "/* multiline comment\r\n*/"],
+	["tag", "validLabel"],
 	["punctuation", ":"]
 ]
 
 ----------------------------------------------------
 
-Checks for tags (labels).
+Checks for tags (labels).