some import cleanups
This commit is contained in:
		
							parent
							
								
									dab15c83ff
								
							
						
					
					
						commit
						5cb1ea228f
					
				| @ -1,4 +1,4 @@ | |||||||
| module Options | module Options (parseOptions, parsePatternArgs, wildcard, Flag(..), usage, ledgerFilePath) | ||||||
| where | where | ||||||
| import System.Console.GetOpt | import System.Console.GetOpt | ||||||
| import System.Directory | import System.Directory | ||||||
|  | |||||||
| @ -47,8 +47,8 @@ import qualified Data.Map as Map (lookup) | |||||||
| 
 | 
 | ||||||
| import Options | import Options | ||||||
| import Models | import Models | ||||||
| import Parse | import Parse (parseLedgerAndDo, parseLedgerFile) | ||||||
| import Tests | import Tests (hunit, quickcheck) | ||||||
| import Utils hiding (test) | import Utils hiding (test) | ||||||
| 
 | 
 | ||||||
| 
 | 
 | ||||||
| @ -69,8 +69,8 @@ type Command = [Flag] -> (Regex,Regex) -> IO () | |||||||
| 
 | 
 | ||||||
| selftest :: Command | selftest :: Command | ||||||
| selftest opts pats = do  | selftest opts pats = do  | ||||||
|   Tests.hunit |   hunit | ||||||
|   Tests.quickcheck |   quickcheck | ||||||
|   return () |   return () | ||||||
| 
 | 
 | ||||||
| print_ :: Command | print_ :: Command | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user