Replace :timer.sleep/1 by Process.sleep/1

Author: José Valim

lib/elixir/lib/stream.ex

@@ -436,7 +436,7 @@ defmodule Stream do
   @spec interval(non_neg_integer) :: Enumerable.t
   def interval(n) do
     unfold 0, fn(count) ->
-      :timer.sleep(n)
+      Process.sleep(n)
       {count, count + 1}
     end
   end

lib/elixir/lib/task.ex

@@ -533,7 +533,7 @@ defmodule Task do
       tasks =
         for i <- 1..10 do
           Task.async(fn ->
-            :timer.sleep(i * 1000)
+            Process.sleep(i * 1000)
             i
           end)
         end

lib/elixir/test/elixir/exception_test.exs

@@ -268,7 +268,8 @@ defmodule ExceptionTest do
     fsm_reason = {%ArgumentError{}, [{:not_a_real_module, :function, 0, []}]}
     reason = try do
       :gen_fsm.sync_send_event(spawn(fn() ->
-          :timer.sleep(200) ; exit(fsm_reason)
+        Process.sleep(200)
+        exit(fsm_reason)
       end), :hello)
     catch
       :exit, reason -> reason
@@ -283,7 +284,10 @@ defmodule ExceptionTest do
 
   test "format_exit with nested calls" do
     # Fake reason to prevent error_logger printing to stdout
-    event_fun = fn() -> :timer.sleep(200) ; exit(:normal) end
+    event_fun = fn() ->
+      Process.sleep(200)
+      exit(:normal)
+    end
     server_pid = spawn(fn()-> :gen_event.call(spawn(event_fun), :handler, :hello) end)
     reason = try do
       :gen_server.call(server_pid, :hi)
@@ -300,7 +304,10 @@ defmodule ExceptionTest do
   test "format_exit with nested calls and exception" do
     # Fake reason to prevent error_logger printing to stdout
     event_reason = {%ArgumentError{}, [{:not_a_real_module, :function, 0, []}]}
-    event_fun = fn() -> :timer.sleep(200) ; exit(event_reason) end
+    event_fun = fn() ->
+      Process.sleep(200)
+      exit(event_reason)
+    end
     server_pid = spawn(fn()-> :gen_event.call(spawn(event_fun), :handler, :hello) end)
     reason = try do
       :gen_server.call(server_pid, :hi)

lib/elixir/test/elixir/gen_event/stream_test.exs

@@ -7,7 +7,7 @@ defmodule GenEvent.StreamTest do
     use GenEvent
 
     def handle_event(_event, _state) do
-      :timer.sleep(100)
+      Process.sleep(100)
       :remove_handler
     end
   end
@@ -37,7 +37,7 @@ defmodule GenEvent.StreamTest do
 
     spawn_link fn ->
       Enum.each GenEvent.stream(pid), fn _ ->
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end
     end
 
@@ -72,7 +72,7 @@ defmodule GenEvent.StreamTest do
 
     spawn_link fn ->
       Enum.each GenEvent.stream(pid), fn _ ->
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end
     end
 
@@ -93,7 +93,7 @@ defmodule GenEvent.StreamTest do
 
     spawn_link fn ->
       Enum.each(GenEvent.stream(pid), fn _ ->
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end)
     end
 

lib/elixir/test/elixir/process_test.exs

@@ -19,7 +19,7 @@ defmodule ProcessTest do
   end
 
   test "group_leader/2 and group_leader/0" do
-    another = spawn_link(fn -> :timer.sleep(1000) end)
+    another = spawn_link(fn -> Process.sleep(1000) end)
     assert Process.group_leader(self(), another)
     assert Process.group_leader == another
   end
@@ -34,7 +34,7 @@ defmodule ProcessTest do
   end
 
   test "info/2" do
-    pid = spawn fn -> :timer.sleep(1000) end
+    pid = spawn fn -> Process.sleep(1000) end
     assert Process.info(pid, :priority) == {:priority, :normal}
     assert Process.info(pid, [:priority]) == [priority: :normal]
 

lib/elixir/test/elixir/task_test.exs

@@ -370,7 +370,7 @@ defmodule TaskTest do
       task = Task.async(fn() ->
         Process.flag(:trap_exit, true)
         wait_and_send(caller, :ready)
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end)
 
       receive do: (:ready -> :ok)
@@ -447,7 +447,7 @@ defmodule TaskTest do
       task = Task.async(fn() ->
         Process.flag(:trap_exit, true)
         wait_and_send(caller, :ready)
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end)
 
       receive do: (:ready -> :ok)

lib/ex_unit/test/ex_unit/capture_io_test.exs

@@ -67,7 +67,7 @@ defmodule ExUnit.CaptureIOTest do
 
     assert capture_io(fn ->
       spawn(fn -> :io.put_chars("a") end)
-      :timer.sleep(10)
+      Process.sleep(10)
     end) == "a"
 
     assert capture_io(fn ->
@@ -311,7 +311,7 @@ defmodule ExUnit.CaptureIOTest do
     {_pid, ref} = spawn_monitor(fn ->
       capture_io(:stderr, fn ->
         spawn_link(Kernel, :exit, [:shutdown])
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end)
     end)
 
@@ -335,12 +335,12 @@ defmodule ExUnit.CaptureIOTest do
   end
 
   test "capture :stderr by two processes" do
-    spawn(fn -> capture_io(:stderr, fn -> :timer.sleep(100) end) end)
-    :timer.sleep(10)
+    spawn(fn -> capture_io(:stderr, fn -> Process.sleep(100) end) end)
+    Process.sleep(10)
     assert_raise RuntimeError, "IO device registered at :standard_error is already captured", fn ->
       capture_io(:stderr, fn -> nil end)
     end
-    :timer.sleep(100)
+    Process.sleep(100)
   end
 
   defp send_and_receive_io(req) do

lib/ex_unit/test/ex_unit/capture_log_test.exs

@@ -44,7 +44,7 @@ defmodule ExUnit.CaptureLogTest do
     {_pid, ref} = spawn_monitor(fn ->
       capture_log(fn ->
         spawn_link(Kernel, :exit, [:shutdown])
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end)
     end)
 
@@ -85,7 +85,7 @@ defmodule ExUnit.CaptureLogTest do
     case GenEvent.which_handlers(Logger) do
       [Logger.Config] -> :ok
       _otherwise ->
-        :timer.sleep(20)
+        Process.sleep(20)
         wait_capture_removal()
     end
   end

lib/ex_unit/test/ex_unit_test.exs

@@ -50,23 +50,23 @@ defmodule ExUnitTest do
 
       @tag timeout: 10
       test "ok" do
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end
     end
 
     ExUnit.Server.cases_loaded()
 
     output = capture_io(fn -> ExUnit.run end)
     assert output =~ "** (ExUnit.TimeoutError) test timed out after 10ms"
-    assert output =~ ~r"\(stdlib\) timer\.erl:\d+: :timer\.sleep/1"
+    assert output =~ ~r"\(elixir\) lib/process\.ex:\d+: Process\.sleep/1"
   end
 
   test "it supports configured timeout" do
     defmodule ConfiguredTimeoutTest do
       use ExUnit.Case
 
       test "ok" do
-        :timer.sleep(:infinity)
+        Process.sleep(:infinity)
       end
     end
 

lib/iex/test/iex/info_test.exs

@@ -112,7 +112,7 @@ defmodule IEx.InfoTest do
   end
 
   test "PIDs" do
-    pid = spawn_link(fn -> :timer.sleep(1000) end)
+    pid = spawn_link(fn -> Process.sleep(1000) end)
 
     info = Info.info(pid)
     assert info[:"Alive"] == true