:qt and :qt-impl packages to prevent collision with :cl symbols and fix object with non smoke parent.
src/package.lisp
Thu Jun 11 16:59:48 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* :qt and :qt-impl packages to prevent collision with :cl symbols and fix object with non smoke parent.
--- old-qt.gui/src/package.lisp 2014-10-30 07:47:03.000000000 +0100
+++ new-qt.gui/src/package.lisp 2014-10-30 07:47:04.000000000 +0100
@@ -1,5 +1,9 @@
-(defpackage :qt
- (:use :cl :smoke :cffi :bordeaux-threads :cxx-support :alexandria)
+(defpackage :cl-smoke.qt-impl
+ (:use :cl :smoke :cffi :bordeaux-threads :cxx-support :alexandria))
+
+(defpackage :cl-smoke.qt
+ (:use) ;; do not use :cl to prevent collition with TIME and CHAR
+ (:nicknames :qt)
(:export #:app
#:app-p
#:exec
@@ -26,6 +30,9 @@
#:class-properties
#:class-direct-properties
+ #:make-char
+ #:from-char
+
#:from-variant
#:make-variant
#:make-lisp-variant
@@ -35,6 +42,8 @@
#:search-file
#:connect
+ #:disconnect
+ #:disconnect-all
#:get-slot
#:get-signal
#:make-slot