git.iko.soy/denis
on master help sign in
Made it compile
3ca6036iko
denis/src/Data/Text/Validator.hs+1−1
compare with master
unifiedsplit
@@ -17,7 +17,7 @@ import Data.Limits
17isValidChar :: Char -> Bool
17isValidChar :: Char -> Bool
18isValidChar '\n' = True
18isValidChar '\n' = True
19isValidChar '\r' = True
19isValidChar '\r' = True
20−isValidChar = isPrint
20+isValidChar c = isPrint c
21
21
22class HasValidatableText t where
22class HasValidatableText t where
23 validateText :: t -> Bool
23 validateText :: t -> Bool