mirror of
https://github.com/rabbibotton/clog.git
synced 2025-12-06 18:50:42 -08:00
Prevent GC using (run body)
This commit is contained in:
parent
68882c1692
commit
d11148bcc9
12 changed files with 48 additions and 9 deletions
|
|
@ -23,7 +23,12 @@
|
|||
(set-on-click hello-element ; Now we set a function to handle clicks
|
||||
(lambda (obj) ; In this case we use an anonymous function
|
||||
(declare (ignore obj))
|
||||
(setf (color hello-element) "green")))))
|
||||
(setf (color hello-element) "green")))
|
||||
|
||||
(run body))) ; Keep our thread alive until connection closes
|
||||
; and prevent garbage collection of our CLOG-Objects
|
||||
; until no longer needed.
|
||||
|
||||
;; To see all the events one can set and the many properties and styles that
|
||||
;; exist, take a look through the CLOG manual or the file clog-element.lisp
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue