Fix fix

gib-gab-gob/board.scm

@@ -12,6 +12,9 @@
 (define (make-board)
   (make-array #f ggg-size ggg-size))
 
+(define (board-ref board x y)
+  (array-ref board y x))
+
 (define (board-assert-vacant board x y)
   (define ref (board-ref board x y))
   (if ref (error "That space is already occupied with:" ref) ref))