Thu Jul 23 00:22:47 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Qt property names are symbols in the keyword package.
hunk ./src/gc.lisp 6
-;;; Sometimes calling GC twice helps in sbcl.
+;;; Sometimes calling GC twice helps in SBCL.
hunk ./src/gc.lisp 14
- (dotimes (x 9)
+ (dotimes (x 10)
hunk ./src/properties.lisp 14
- (5am:is (eql t (qt:property-p o 'object-name)))
+ (5am:is (eql t (qt:property-p o :object-name)))
hunk ./src/properties.lisp 16
- (setf (qt:property o 'object-name) "fooBar")
- (5am:is (string= (qt:property o 'object-name) "fooBar"))
+ (setf (qt:property o :object-name) "fooBar")
+ (5am:is (string= (qt:property o :object-name) "fooBar"))