assertnotequal
This commit is contained in:
		
							parent
							
								
									77b7de1b5f
								
							
						
					
					
						commit
						9b5a35b5d2
					
				| @ -41,6 +41,7 @@ import Text.ParserCombinators.Parsec (parse) | ||||
| -- testing | ||||
| 
 | ||||
| assertequal e a = assertEqual "" e a | ||||
| assertnotequal e a = assertBool "expected inequality, got equality" (e /= a) | ||||
| 
 | ||||
| parsewith p ts = parse p "" ts | ||||
| 
 | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user