mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 10:40:45 -08:00
Code Issues Projects Releases Wiki Activity

Removed types from demo

Browse source
This commit is contained in:
David Botton 2021-02-02 09:43:14 -05:00
parent bb5b2379fa
commit 00dcbdc902
1 changed files with 0 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
demos/01-demo.lisp
View file

@ -21,19 +21,15 @@
(defclass app-data () (defclass app-data ()
((snake-direction ((snake-direction
:initform :right :initform :right
:type snake-direction-type
:accessor snake-direction) :accessor snake-direction)
(score (score
:initform 0 :initform 0
:type number
:accessor score) :accessor score)
(food (food
:initform (new-food) :initform (new-food)
:type cons
:accessor food) :accessor food)
(snake (snake
:initform nil :initform nil
:type cons
:accessor snake))) :accessor snake)))
(defun display-splash (body) (defun display-splash (body)