Wed May 27 19:29:05 CEST 2009  Tobias Rautenkranz <tobias@rautenkranz.ch>
  * Test CXX:= overload resolution
diff -rN -u old-qt.tests/src/operators.lisp new-qt.tests/src/operators.lisp
--- old-qt.tests/src/operators.lisp	2014-10-30 07:57:53.000000000 +0100
+++ new-qt.tests/src/operators.lisp	2014-10-30 07:57:53.000000000 +0100
@@ -22,6 +22,12 @@
       (5am:is (eq (or (/= x1 x2)
                       (/= y1 y2))
                   (cxx:/= p1 p2))))))
+
+(5am:test cxx-equality-conversion
+  "Test cxx:= overload resolution."
+  (5am:is (eq t (cxx:= (qt:make-variant "foo") "foo")))
+  (5am:is (eq t (cxx:= "foo" (qt:make-variant "foo") "foo")))
+  (5am:is (eq nil (cxx:= "foo" (qt:make-variant "foo") "bar"))))
                   
 (5am:test (cxx-+ :depends-on cxx-equality)
   "Test cxx:+"