From c066364b7267f385cdd90a620a6d8a18d81dde8e Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sat, 25 May 2024 10:31:50 -0400 Subject: [PATCH] Fix error when block cannot be pushed. --- modules/game/actors.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/modules/game/actors.scm b/modules/game/actors.scm index ba06c40..cb8d061 100644 --- a/modules/game/actors.scm +++ b/modules/game/actors.scm @@ -163,8 +163,8 @@ (match ($ obj 'type) ('switch (do-push)) ('gate (when ($ obj 'open?) (do-push))) - (_ (values)))) - (_ (values)))))))))))) + (_ #f))) + (_ #f))))))))))) (('pushed?) ($ pushed?)))) (define (^clock-emitter bcom x y interval)