From 84840ede6646ed793b61cdd889d3f57ab05e9311 Mon Sep 17 00:00:00 2001 From: Gene Pasquet Date: Wed, 8 Apr 2026 01:32:55 +0100 Subject: Refactor to be functional --- demo/scaling.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'demo/scaling.scm') diff --git a/demo/scaling.scm b/demo/scaling.scm index 983e583..f8bfdfb 100644 --- a/demo/scaling.scm +++ b/demo/scaling.scm @@ -53,7 +53,8 @@ (ny (max 0 (min (- +height+ +box-size+) (+ (entity-ref box #:y 0) vy)))) (box (entity-set (entity-set box #:x nx) #:y ny))) - (scene-entities-set! scene (list box)))) + (game-scene-set! game + (update-scene scene entities: (list box))))) render: (lambda (game) (let* ((renderer (game-renderer game)) -- cgit v1.2.3