git.iko.soy/elk
on master help sign in
Switch to List representation for append test
a4aa150Alex Neslusan
tests/elm/Test/Array.elm+1−1
compare with master
unifiedsplit
@@ -22,7 +22,7 @@ tests =
22 basicsTests = [ test "length" <| assertEqual (Array.length (Array.fromList [1,2,3])) 3
22 basicsTests = [ test "length" <| assertEqual (Array.length (Array.fromList [1,2,3])) 3
23 , test "length - Long" <| assertEqual (Array.length (Array.repeat 10000 0)) 10000
23 , test "length - Long" <| assertEqual (Array.length (Array.repeat 10000 0)) 10000
24 , test "push" <| assertEqual (Array.push 3 (Array.fromList [1,2])) (Array.fromList [1,2,3])
24 , test "push" <| assertEqual (Array.push 3 (Array.fromList [1,2])) (Array.fromList [1,2,3])
25− , test "append" <| assertEqual (Array.append (Array.repeat 2 42) (Array.repeat 3 81)) (Array.fromList [42,42,81,81,81])
25+ , test "append" <| assertEqual (Array.toList <| Array.append (Array.repeat 2 42) (Array.repeat 3 81)) ([42,42,81,81,81])
26 ]
26 ]
27 getAndSetTests = [ test "get" <| assertEqual (Array.get 2 (Array.fromList [3,2,1])) 1
27 getAndSetTests = [ test "get" <| assertEqual (Array.get 2 (Array.fromList [3,2,1])) 1
28 , test "getMaybe" <| assertEqual (Array.getMaybe 1 (Array.fromList [3,2,1])) (Just 2)
28 , test "getMaybe" <| assertEqual (Array.getMaybe 1 (Array.fromList [3,2,1])) (Just 2)