Use explicit exports
This commit is contained in:
		
							parent
							
								
									a594680852
								
							
						
					
					
						commit
						5b8d419b24
					
				
					 1 changed files with 23 additions and 1 deletions
				
			
		| 
						 | 
				
			
			@ -1,6 +1,28 @@
 | 
			
		|||
{-# LANGUAGE TemplateHaskell #-}
 | 
			
		||||
{-# LANGUAGE FlexibleInstances #-}
 | 
			
		||||
module Tetris where
 | 
			
		||||
module Tetris
 | 
			
		||||
  (
 | 
			
		||||
  -- Game state modifiers
 | 
			
		||||
    initGame
 | 
			
		||||
  , timeStep
 | 
			
		||||
  , shift
 | 
			
		||||
  , rotate
 | 
			
		||||
  , hardDrop
 | 
			
		||||
  -- Game state queries
 | 
			
		||||
  , isGameOver
 | 
			
		||||
  , hardDroppedBlock
 | 
			
		||||
  , coords
 | 
			
		||||
  -- Types
 | 
			
		||||
  , Block(..)
 | 
			
		||||
  , Coord(..)
 | 
			
		||||
  , Direction(..)
 | 
			
		||||
  , Game(..)
 | 
			
		||||
  , Tetrimino(..)
 | 
			
		||||
  -- Lenses
 | 
			
		||||
  , block, board, level, nextShape, score, shape
 | 
			
		||||
  -- Constants
 | 
			
		||||
  , boardHeight, boardWidth, relCells
 | 
			
		||||
  ) where
 | 
			
		||||
 | 
			
		||||
import Data.Map (Map)
 | 
			
		||||
import qualified Data.Map as M
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue