aboutsummaryrefslogtreecommitdiff
path: root/demo
diff options
context:
space:
mode:
Diffstat (limited to 'demo')
-rw-r--r--demo/sandbox.scm2
-rw-r--r--demo/shmup.scm2
2 files changed, 2 insertions, 2 deletions
diff --git a/demo/sandbox.scm b/demo/sandbox.scm
index 09c31fb..e23584f 100644
--- a/demo/sandbox.scm
+++ b/demo/sandbox.scm
@@ -140,7 +140,7 @@
(let ((scene (game-scene game)))
(game-scene-set! game
(scene-map-entities scene
- (lambda (e)
+ (lambda (scene_ e)
(if (eq? (entity-type e) 'demo-bot)
(update-demo-bot e dt)
e))))))))
diff --git a/demo/shmup.scm b/demo/shmup.scm
index f4897ae..315069c 100644
--- a/demo/shmup.scm
+++ b/demo/shmup.scm
@@ -149,7 +149,7 @@
(game-scene-set! game
(chain (update-scene scene entities: all)
(scene-map-entities _
- (lambda (e) (if (eq? (entity-type e) 'player) e (move-projectile e))))
+ (lambda (scene_ e) (if (eq? (entity-type e) 'player) e (move-projectile e))))
(scene-remove-dead _)
(scene-filter-entities _
(lambda (e) (or (eq? (entity-type e) 'player) (in-bounds? e))))))))))