X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Ftetris%2Fboard%2Fboard.factor;h=2ca3ba8a0bff0ae99639a16609cef23f905761b2;hp=9acb53d8b36b143165f4fe14cf276bce99986aa8;hb=6d4293b5822d769619f66e46e64b704ddfe41b43;hpb=b7bb69b178712e9d135362ebd6efa69c9b8371ba

diff --git a/extra/tetris/board/board.factor b/extra/tetris/board/board.factor
index 9acb53d8b3..2ca3ba8a0b 100644
--- a/extra/tetris/board/board.factor
+++ b/extra/tetris/board/board.factor
@@ -22,9 +22,9 @@ TUPLE: board
 : board@block ( board block -- n row )
     [ second swap rows>> nth ] keep first swap ;
 
-: set-block ( board block colour -- ) -rot board@block set-nth ;
+: set-block ( board block color -- ) -rot board@block set-nth ;
 
-: block ( board block -- colour ) board@block nth ;
+: block ( board block -- color ) board@block nth ;
 
 : block-free? ( board block -- ? ) block not ;