Move main.rkt --> lll-main.rkt
This commit is contained in:
parent
4dad3e9661
commit
8f0ba7625b
|
@ -387,7 +387,6 @@
|
|||
(define new-score (+ s delta))
|
||||
(log-info "Score increased by ~a to ~a" delta new-score)
|
||||
(play-sound-sequence 270304)
|
||||
(define message (text (format "Score: ~a" new-score) 24 "white"))
|
||||
(transition new-score
|
||||
(patch-seq (retract (current-score ?))
|
||||
(assert (current-score delta))
|
Loading…
Reference in New Issue