darcs - commonqt

repos / commonqt / headblob

summary | shortlog | log | tree | annotate | headblob | filehistory
plain

/ src /

/src/package.lisp

 ;; Remove the :qt nickname of :cl-smoke.qt to allow
 ;; :cl-smoke.commonqt to use it.
 (eval-when (:load-toplevel :compile-toplevel)
   (rename-package :cl-smoke.qt :cl-smoke.qt))
 
 (defpackage :cl-smoke.commonqt
   (:use :cl :cxx-support :cffi)
   (:nicknames :qt)
   (:export #:ensure-smoke
            #:enable-syntax
            #:new
 
            #:qsignal
            #:qslot
            
            #:make-qapplication
 
            #:qt-class
            #:find-qclass
            
            #:emit-signal
            #:call-next-qmethod
            #:primitive-value
            
            #:uint
            #:int
            #:bool
            #:qstring
            #:enum=
            
            #:qapropos
            #:qdescribe))
            
 ;; No named-readtables support; fake it.
 ;;
 (defpackage :named-readtables
   (:use :cl)
   (:export #:in-readtable))
 
 (in-package :named-readtables)
 (defun in-readtable (name)
   (declare (ignore name)))

Crece desde el pueblo el futuro / crece desde el pie

RSS