Mon Jun 1 00:41:10 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Test QList<QWidget*> to sequence conversion.
hunk ./src/application.lisp 28
+(5am:test application-widgetlist
+ "Test cxx:all-widgets"
+ (qt:with-app
+ (5am:is (= 0 (length (cxx:all-widgets (qt:app)))))
+ (let ((w (make-instance 'qt:widget)))
+ (5am:is (find w (cxx:all-widgets (qt:app)))))))