]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/tetris/game/game.factor
Harmonize spelling
[factor.git] / extra / tetris / game / game.factor
index b2d3cc8833f456d662487d5c471a41c29c884dd6..ac5dbc2579ea3f31944b460ada4e38aae2d21d7c 100644 (file)
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 
 USING: accessors combinators kernel lists math math.functions
-sequences system tetris.board tetris.piece tetris.tetromino ;
+sequences system tetris.board tetris.piece ;
 
 IN: tetris.game
 
@@ -42,7 +42,7 @@ CONSTANT: default-height 20
     level 1 - 60 * 1,000,000,000 swap - ;
 
 : add-block ( tetris block -- )
-    over [ board>> ] 2dip current-piece tetromino>> colour>> set-block ;
+    over [ board>> ] 2dip current-piece tetromino>> color>> set-block ;
 
 : game-over? ( tetris -- ? )
     [ board>> ] [ next-piece ] bi piece-valid? not ;