@@ -34,6 +34,7 @@ data Array a = Array
3434fill : Int -> a -> Array a
3535fill len e = fromList <| List.map (always e) [1..len]
3636
37+-- TODO: make this a native function.
3738{-| Create an array from a list. -}
3839fromList : [a] -> Array a
3940fromList = List.foldl (Native.Array.push) Native.Array.empty