mirror of
https://gitlab.com/eql/lqml.git
synced 2025-12-06 10:31:34 -08:00
9 lines
342 B
Common Lisp
9 lines
342 B
Common Lisp
(defvar *cpp* (qload-c++ "cpp")) ; loads plugin in main/UI thread
|
|
|
|
(define-qt-wrappers *cpp*)
|
|
|
|
;; qrun* needed in Slime for message box (not running on UI thread)
|
|
(qrun* (print (hello *cpp* '(1 "two" (1.25 #(50 -50 75))))))
|
|
|
|
;; qrun* needed in Slime to see the return value (blocking call in main thread)
|
|
(qrun* (print (call-lisp *cpp* 42)))
|