cleanup
This commit is contained in:
		
							parent
							
								
									04a5f1632b
								
							
						
					
					
						commit
						3751a91c60
					
				
							
								
								
									
										5
									
								
								Makefile
									
									
									
									
									
								
							
							
						
						
									
										5
									
								
								Makefile
									
									
									
									
									
								
							| @ -1,8 +1,11 @@ | ||||
| build: | ||||
| 	ghc --make hledger.hs | ||||
| 
 | ||||
| Tags: | ||||
| 	hasktags *hs | ||||
| 
 | ||||
| clean: | ||||
| 	rm -f *.o *.hi *~ | ||||
| 
 | ||||
| Clean: clean | ||||
| 	rm -f hledger | ||||
| 	rm -f hledger TAGS | ||||
|  | ||||
							
								
								
									
										12
									
								
								Tests.hs
									
									
									
									
									
								
							
							
						
						
									
										12
									
								
								Tests.hs
									
									
									
									
									
								
							| @ -152,15 +152,19 @@ hunittests2 = Test.HUnit.test [ | ||||
|                                "test1" ~: assertEqual "2 equals 2" 2 2 | ||||
|                               ] | ||||
| 
 | ||||
| -- quickcheck tests | ||||
| -- quickcheck properties | ||||
| 
 | ||||
| prop1 = 1 == 1 | ||||
| 
 | ||||
| --prop_test_parse_ledgertransaction = ? | ||||
| --prop_test_parse_ledgertransaction = | ||||
| --     (Transaction "expenses:food:dining" (Amount "$" 10)) ==  | ||||
| --     (parse' ledgertransaction sample_transaction)) | ||||
| -- how ? | ||||
| 
 | ||||
| -- commands | ||||
| 
 | ||||
| test :: IO ()       | ||||
| test = do | ||||
|   putStrLn "hunit: "; runTestTT hunittests; runTestTT hunittests2 | ||||
|   putStrLn "quickcheck: "; quickCheck prop1 | ||||
|   runTestTT hunittests | ||||
|   runTestTT hunittests2 | ||||
|   quickCheck prop1 | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user