First commit

chapter5/process_bottleneck.ex

@@ -0,0 +1,23 @@
+defmodule Server do
+  def start do
+    spawn(fn -> loop() end)
+  end
+
+  def send_msg(server, message) do
+    send(server, {self(), message})
+
+    receive do
+      {:response, response} -> response
+    end
+  end
+
+  def loop do
+    receive do
+      {caller, message} ->
+        Process.sleep(1000)
+        send(caller, {:response, message})
+    end
+
+    loop()
+  end
+end