diff options
| author | Gene Pasquet <dev@etenil.net> | 2026-04-08 01:32:55 +0100 |
|---|---|---|
| committer | Gene Pasquet <dev@etenil.net> | 2026-04-08 01:32:55 +0100 |
| commit | 84840ede6646ed793b61cdd889d3f57ab05e9311 (patch) | |
| tree | 2b62dd73a7321bc71a368b297ab40b3535bd79fc /tests/scene-loader-test.scm | |
| parent | 7903180321bf72b344077a8423930ac161872a2c (diff) | |
Refactor to be functional
Diffstat (limited to 'tests/scene-loader-test.scm')
| -rw-r--r-- | tests/scene-loader-test.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/scene-loader-test.scm b/tests/scene-loader-test.scm index 22de396..5c85ede 100644 --- a/tests/scene-loader-test.scm +++ b/tests/scene-loader-test.scm @@ -45,8 +45,8 @@ (defstruct camera x y) (defstruct scene entities tilemap tileset camera tileset-texture camera-target background) (define (scene-add-entity scene entity) - (scene-entities-set! scene (cons entity (scene-entities scene))) - scene)) + (update-scene scene + entities: (append (scene-entities scene) (list entity))))) (import downstroke-world) ;; Mock assets module |
