Use new qt:with-app.
src/hello-world.lisp
Wed Jul 1 13:01:24 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Use new qt:with-app.
--- old-qt.examples/src/hello-world.lisp 2014-10-01 20:28:01.000000000 +0200
+++ new-qt.examples/src/hello-world.lisp 2014-10-01 20:28:01.000000000 +0200
@@ -5,7 +5,7 @@
(defun hello-world ()
"Hello world"
- (qt:with-app
+ (qt:with-app ()
(let ((widget (make-instance 'qt:push-button :args '("Hello world"))))
(cxx:show widget)
- (qt:exec widget))))
+ (qt:exec))))