Move demos and tutorials to their own packages

This commit is contained in:
David Botton 2021-12-29 13:25:43 -05:00
parent 63586cfb0f
commit 2c7230356e
35 changed files with 75 additions and 83 deletions

View file

@ -1,8 +1,8 @@
(defpackage #:clog-user
(defpackage #:clog-tut-4
(:use #:cl #:clog)
(:export start-tutorial))
(in-package :clog-user)
(in-package :clog-tut-4)
(defun my-on-click (obj) ; obj in any event is the target of the event
(setf (color obj) (rgb 0 255 0))) ; this makes it possible to reuse event handlers