[tests] remove duplicated symbol in BCrypt

This commit is contained in:
Vincent Hanquez 2015-11-19 14:23:45 +00:00
parent fae5f084cf
commit 081a14326e

View File

@ -60,7 +60,7 @@ expected =
, ("$2a$06$.rCVZVOThsIa97pEDOxvGuRRgzG64bvtJ0938xuqzv18d3ZpQhstC", "abcdefghijklmnopqrstuvwxyz") , ("$2a$06$.rCVZVOThsIa97pEDOxvGuRRgzG64bvtJ0938xuqzv18d3ZpQhstC", "abcdefghijklmnopqrstuvwxyz")
] ]
makeKATs expected = concatMap maketest (zip3 is passwords hashes) makeKATs = concatMap maketest (zip3 is passwords hashes)
where where
is :: [Int] is :: [Int]
is = [1..] is = [1..]
@ -73,5 +73,5 @@ makeKATs expected = concatMap maketest (zip3 is passwords hashes)
] ]
tests = testGroup "bcrypt" tests = testGroup "bcrypt"
[ testGroup "KATs" (makeKATs expected) [ testGroup "KATs" makeKATs
] ]