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 --- physics.scm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'physics.scm') diff --git a/physics.scm b/physics.scm index 56966c2..24ded09 100644 --- a/physics.scm +++ b/physics.scm @@ -318,8 +318,7 @@ entities (index-pairs (length entities)))) - ;; Wrapper for scene-resolve-collisions + ;; Returns a new scene with entity-entity collisions resolved. (define (scene-resolve-collisions scene) - (scene-entities-set! scene - (resolve-entity-collisions (scene-entities scene))) - scene)) + (update-scene scene + entities: (resolve-entity-collisions (scene-entities scene))))) -- cgit v1.2.3