Mon May 11 17:42:25 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Test setf for "set[A-Z].*" methods.
hunk ./src/application.lisp 13
- (cxx:set-object-name (qt:app) "core-app")) ;; test for memfault
+ (setf (cxx:object-name (qt:app)) "core-app")) ;; test for memfault
hunk ./src/application.lisp 17
- (cxx:set-object-name (qt:app) "app")))))
+ (setf (cxx:object-name (qt:app)) "app")))))
hunk ./src/qstring.lisp 13
- (cxx:set-object-name object string)
+ (setf (cxx:object-name object) string)