Sat Apr 3 21:13:24 CEST 2010 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Test static member variable access using slot-value with a class object.
hunk ./src/properties.lisp 43
+ (5am:is (slot-boundp (find-class 'qt:object) :static-meta-object))
hunk ./src/properties.lisp 47
+ (5am:is (string= "QObject"
+ (cxx:class-name
+ (slot-value (find-class 'qt:object)
+ :static-meta-object))))