avoid a Text.Printf name collision with GHC 7.7+ (fixes #153)
This commit is contained in:
		
							parent
							
								
									2a23ebd74f
								
							
						
					
					
						commit
						d55f686f68
					
				| @ -67,13 +67,13 @@ formatLiteral = do | ||||
|       c =     (satisfy isPrintableButNotPercentage <?> "printable character") | ||||
|           <|> try (string "%%" >> return '%') | ||||
| 
 | ||||
| formatString :: GenParser Char st FormatString | ||||
| formatString = | ||||
| formatStr :: GenParser Char st FormatString | ||||
| formatStr = | ||||
|         formatField | ||||
|     <|> formatLiteral | ||||
| 
 | ||||
| formatStrings :: GenParser Char st [FormatString] | ||||
| formatStrings = many formatString | ||||
| formatStrings = many formatStr | ||||
| 
 | ||||
| testFormat :: FormatString -> String -> String -> Assertion | ||||
| testFormat fs value expected = assertEqual name expected actual | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user