Remove pks.

This commit is contained in:
David Thompson 2024-05-26 19:49:11 -04:00
parent 2ce709b95b
commit c41fb5abfe
3 changed files with 4 additions and 10 deletions

View file

@ -910,7 +910,6 @@
(match prev-pos
(#(prev-x prev-y _)
(let ((offset (vector (- x prev-x) (- y prev-y))))
(pk 'collision! ($ obj 'type) ($ other 'type))
($ other 'collide obj offset grid-info)
($ obj 'collide other offset grid-info)
;; If collision resolution displaced the other