QL for QL: add small test for misspelling query

Author: nickrolfe

ql/ql/test/queries/style/Misspelling/Misspelling.expected

@@ -0,0 +1,6 @@
+| Test.qll:1:1:3:3 | QLDoc | This QLDoc comment contains the common misspelling 'mispelled', which should instead be 'misspelled'. |
+| Test.qll:4:1:11:1 | Class PublicallyAccessible | This class name contains the common misspelling 'publically', which should instead be 'publicly'. |
+| Test.qll:5:3:5:20 | FieldDecl | This field name contains the common misspelling 'occurences', which should instead be 'occurrences'. |
+| Test.qll:10:3:10:36 | ClassPredicate hasAgrument | This classPredicate name contains the common misspelling 'agrument', which should instead be 'argument'. |
+| Test.qll:13:1:16:3 | QLDoc | This QLDoc comment contains the non-US spelling 'colour', which should instead be 'color'. |
+| Test.qll:17:1:22:1 | Class AnalysedInt | This class name contains the non-US spelling 'analysed', which should instead be 'analyzed'. |

ql/ql/test/queries/style/Misspelling/Misspelling.qlref

@@ -0,0 +1 @@
+queries/style/Misspelling.ql

ql/ql/test/queries/style/Misspelling/Test.qll

@@ -0,0 +1,22 @@
+/**
+ * A string that's deliberately mispelled (and so is that last word).
+ */
+class PublicallyAccessible extends string {
+  int numOccurences; // should be 'occurrences'
+
+  PublicallyAccessible() { this = "publically" and numOccurences = 123 }
+
+  // should be argument
+  predicate hasAgrument() { none() }
+}
+
+/**
+ * A class whose name contains a British-English spelling.
+ * And here's the word 'colour'.
+ */
+class AnalysedInt extends int {
+  AnalysedInt() { this = 7 }
+
+  // 'analyses' should not be flagged
+  int numAnalyses() { result = 1 }
+}