Remove broken List.unzip

Author: José Valim

lib/elixir/lib/gen_event.ex

@@ -683,8 +683,8 @@ defmodule GenEvent do
 
   @doc false
   def system_replace_state(fun, [name, handlers, hib]) do
-    [handlers, states] =
-      List.unzip(for handler <- handlers do
+    {handlers, states} =
+      :lists.unzip(for handler <- handlers do
         handler(module: mod, id: id, state: state) = handler
         cur = {mod, id, state}
         try do

lib/elixir/lib/kernel.ex

@@ -1643,7 +1643,7 @@ defmodule Kernel do
 
       iex> users = [%{name: "john", age: 27}, %{name: "meg", age: 23}]
       iex> all = fn :get_and_update, data, next ->
-      ...>   Enum.map(data, next) |> List.unzip() |> List.to_tuple()
+      ...>   Enum.map(data, next) |> :lists.unzip
       ...> end
       iex> get_and_update_in(users, [all, :age], &{&1, &1 + 1})
       {[27, 23], [%{name: "john", age: 28}, %{name: "meg", age: 24}]}

lib/elixir/lib/list.ex

@@ -324,26 +324,6 @@ defmodule List do
     do_zip(list_of_lists, [])
   end
 
-  @doc """
-  Unzips the given list of tuples into a list of lists.
-
-  The number of unzipped elements is equal to the size
-  of the smallest tuple in the list.
-
-  ## Examples
-
-      iex> List.unzip([{1, 2}, {3, 4}])
-      [[1, 3], [2, 4]]
-
-      iex> List.unzip([{1, :a, "apple"}, {2, :b, "banana"}, {3, :c}])
-      [[1, 2, 3], [:a, :b, :c]]
-
-  """
-  @spec unzip([tuple]) :: [list]
-  def unzip(list) when is_list(list) do
-    :lists.map &Tuple.to_list/1, zip(list)
-  end
-
   @doc """
   Returns a list with `value` inserted at the specified `index`.
   Note that `index` is capped at the list length. Negative indices

lib/elixir/test/elixir/list_test.exs

@@ -75,13 +75,6 @@ defmodule ListTest do
     assert List.zip([[1, 4], [2, 5], []]) == []
   end
 
-  test :unzip do
-    assert List.unzip([{1, 2, 3}, {4, 5, 6}]) == [[1, 4], [2, 5], [3, 6]]
-    assert List.unzip([{1, 2, 3}, {4, 5}]) == [[1, 4], [2, 5]]
-    assert List.unzip([[1, 2, 3], [4, 5]]) == [[1, 4], [2, 5]]
-    assert List.unzip([]) == []
-  end
-
   test :keyfind do
     assert List.keyfind([a: 1, b: 2], :a, 0) == {:a, 1}
     assert List.keyfind([a: 1, b: 2], 2, 1) == {:b, 2}