11 lines
		
	
	
		
			206 B
		
	
	
	
		
			Haskell
		
	
	
	
	
	
		
		
			
		
	
	
			11 lines
		
	
	
		
			206 B
		
	
	
	
		
			Haskell
		
	
	
	
	
	
| 
								 | 
							
								module API(CLIInterface(..), testio) where
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								import Data.Typeable
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								data CLIInterface = CLIInterface {
							 | 
						||
| 
								 | 
							
								    repl :: IO ()
							 | 
						||
| 
								 | 
							
								} deriving Typeable
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								testio :: CLIInterface
							 | 
						||
| 
								 | 
							
								testio = CLIInterface { repl = return () }
							 |