Remove unused procedures.

This commit is contained in:
David Thompson 2024-05-20 22:14:21 -04:00
parent 816d9d149d
commit 3925e39737

View file

@ -176,10 +176,6 @@
(not (null? ($ (grid-ref grid x y)))))))
(define grid-info (spawn ^grid-info))
(define (wrap-x x)
(modulo x width))
(define (wrap-y y)
(modulo y height))
(define (delq item lst)
(let lp ((lst lst))
(match lst