Marking :connection/query-command as mysql only for now. It is low priority and cause...
authorNathan Bird <nathan@acceleration.net>
Mon, 1 Feb 2010 20:12:12 +0000 (15:12 -0500)
committerNathan Bird <nathan@acceleration.net>
Mon, 1 Feb 2010 20:12:12 +0000 (15:12 -0500)
tests/test-init.lisp

index 500b89852125ee48a8af06f7882317f69741a313..7a46089b16b820e7fab2420dd393dff3d5fe8b3f 100644 (file)
                                *rt-ooddl* *rt-oodml* *rt-syntax*))
       (let ((test (second test-form)))
         (cond
+         ((and (not (eql db-underlying-type :mysql))
+               (clsql-sys:in test :connection/query-command))
+          (push (cons test "Known to only work in mysql as yet.") skip-tests))
           ((and (null (clsql-sys:db-type-has-views? db-underlying-type))
                 (clsql-sys:in test :fddl/view/1 :fddl/view/2 :fddl/view/3 :fddl/view/4))
            (push (cons test "views not supported.") skip-tests))