Test QList translation
Annotate for file /src/qlist.lisp
2010-01-25 tobias 1 (in-package :qt.tests)
18:51:13 ' 2
' 3 (5am:in-suite :qt.suite)
' 4
' 5 (5am:test variant-list
' 6 "QList<Variant>"
' 7 (let ((variants (vector (qt:make-variant "foo"))))
' 8 (5am:is (every #'cxx:=
' 9 variants
' 10 (cxx:to-list (qt:make-variant variants))))))
' 11