lib: fix journalApplyValue test (#999)
This commit is contained in:
		
							parent
							
								
									08d226aaf5
								
							
						
					
					
						commit
						1cacfcea28
					
				| @ -307,8 +307,10 @@ tests_Cli_Utils = tests "Utils" [ | ||||
| 
 | ||||
|      -- Print the time required to convert one of the sample journals' amounts to value. | ||||
|      -- Pretty clunky, but working. | ||||
|      -- XXX sample.journal has no price records, but is always present. | ||||
|      -- Change to eg examples/5000x1000x10.journal to make this useful. | ||||
|      test "time" $ do | ||||
|        ej <- io $ readJournalFile definputopts "examples/3000x1000x10.journal" | ||||
|        ej <- io $ readJournalFile definputopts "examples/sample.journal" | ||||
|        case ej of | ||||
|          Left e  -> crash $ T.pack e | ||||
|          Right j -> do | ||||
|  | ||||
							
								
								
									
										1
									
								
								tests/0unittests/examples
									
									
									
									
									
										Symbolic link
									
								
							
							
						
						
									
										1
									
								
								tests/0unittests/examples
									
									
									
									
									
										Symbolic link
									
								
							| @ -0,0 +1 @@ | ||||
| ../../examples | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user