Added (now passing) test for @@ full text search
[dbsrgits/SQL-Abstract.git] / t / 11parser.t
index 202e5fa..8735ffe 100644 (file)
@@ -800,8 +800,13 @@ is_deeply($sqlat->parse('SELECT foo FROM bar ORDER BY x + ? DESC, oomph, y - ? D
   ]
 ], 'Crazy ORDER BY parsed correctly');
 
-
-is_deeply($sqlat->parse("SELECT * * FROM (SELECT *, FROM foobar baz buzz) foo bar WHERE NOT NOT NOT EXISTS (SELECT 'cr,ap') AND foo.a = ? and not (foo.b LIKE 'station') and x = y and a = b and GROUP BY , ORDER BY x x1 x2 y asc, max(y) desc x z desc"), [
+is_deeply( $sqlat->parse("META SELECT * * FROM (SELECT *, FROM foobar baz buzz) foo bar WHERE NOT NOT NOT EXISTS (SELECT 'cr,ap') AND foo.a = ? STUFF moar(stuff) and not (foo.b LIKE 'station') and x = y and a = b and GROUP BY , ORDER BY x x1 x2 y asc, max(y) desc x z desc"), [
+  [
+    "-LITERAL",
+    [
+      "META"
+    ]
+  ],
   [
     "SELECT",
     [
@@ -952,9 +957,36 @@ is_deeply($sqlat->parse("SELECT * * FROM (SELECT *, FROM foobar baz buzz) foo ba
                 ]
               ],
               [
-                "-PLACEHOLDER",
+                "-MISC",
                 [
-                  "?"
+                  [
+                    "-PLACEHOLDER",
+                    [
+                      "?"
+                    ]
+                  ],
+                  [
+                    "-LITERAL",
+                    [
+                      "STUFF"
+                    ]
+                  ]
+                ],
+              ],
+              [
+                'moar',
+                [
+                  [
+                    '-PAREN',
+                    [
+                      [
+                        '-LITERAL',
+                        [
+                          'stuff'
+                        ]
+                      ]
+                    ]
+                  ]
                 ]
               ]
             ]
@@ -1086,25 +1118,30 @@ is_deeply($sqlat->parse("SELECT * * FROM (SELECT *, FROM foobar baz buzz) foo ba
                     "-MISC",
                     [
                       [
-                        "-DESC",
+                        "-MISC",
                         [
                           [
-                            "-PAREN",
+                            "-DESC",
                             [
                               [
-                                "-LITERAL",
+                                "-PAREN",
                                 [
-                                  "y"
+                                  [
+                                    "-LITERAL",
+                                    [
+                                      "y"
+                                    ]
+                                  ]
                                 ]
                               ]
                             ]
-                          ]
-                        ]
-                      ],
-                      [
-                        "-LITERAL",
-                        [
-                          "x"
+                          ],
+                          [
+                            "-LITERAL",
+                            [
+                              "x"
+                            ]
+                          ],
                         ]
                       ],
                       [