Prevent GC using (run body)

This commit is contained in:
David Botton 2021-01-12 15:05:00 -05:00
parent 68882c1692
commit d11148bcc9
12 changed files with 48 additions and 9 deletions

View file

@ -31,7 +31,8 @@
(setf (title (html-document body)) "Tutorial 6")
(set-on-click (create-child body "<h1>(click me to start!)</h1>")
#'my-on-click))
#'my-on-click)
(run body))
(defun start-tutorial ()
"Start turtorial."