@@ -45,5 +45,5 @@ tests =
45 , test "foldr" <| assertEqual (Array.foldr (+) 0 (Array.repeat 3 5)) 15
45 , test "foldr" <| assertEqual (Array.foldr (+) 0 (Array.repeat 3 5)) 15
46 , test "foldl 2" <| assertEqual (Array.foldr (::) [] (Array.fromList [1,2,3])) [3,2,1]
46 , test "foldl 2" <| assertEqual (Array.foldr (::) [] (Array.fromList [1,2,3])) [3,2,1]
48− nativeTests = [ test "jsArrays" <| assertEqual (Array.repeat 1050) (Array.fromJSArray (Array.toJSArray (Array.repeat 1050) ]
48+ nativeTests = [ test "jsArrays" <| assertEqual (Array.repeat 1050) (Native.Array.fromJSArray (Native.Array.toJSArray (Array.repeat 1050) ]
49 in List.concat [creationTests, basicsTests, getAndSetTests, takingArraysApartTests, mappingAndFoldingTests, nativeTests]
49 in List.concat [creationTests, basicsTests, getAndSetTests, takingArraysApartTests, mappingAndFoldingTests, nativeTests]