vv
/
gib-gab-gob
1
0
Fork 1
Code Issues Pull Requests Activity

Switch coords. It kinda works? But testing is annoying.

This commit is contained in:
Vivianne 2023-02-11 22:34:46 -08:00
parent dffa96f5d0
commit e0dd13caab
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gib-gab-gob/actors.scm
View File

@ -103,7 +103,8 @@
(array-map! arr (lambda () (spawn ^mark)))
(methods
[(ref coords) (match coords ((x y) (array-ref arr x y)))]
;; Switch coords for clarity
[(ref coords) (match coords ((x y) (array-ref arr y x)))]
[(chosen? coords) (not (not ($ ($ self 'ref coords) 'get)))]
[(choose! coords mark-char)
(if ($ self 'chosen? coords)