wip whereis

test/whereis_test.exs

@@ -43,9 +43,32 @@ defmodule Mutex.WhereisTest do
       def start_link do
         GenServer.start_link(__MODULE__, [], name: @via)
       end
+
+      def init(init_arg) do
+        {:ok, init_arg}
+      end
+      def stop(pid) do
+        mref = Process.monitor(pid)
+        GenServer.cast(pid, :stop)
+        assert_receive {:DOWN, ^mref, :process, ^pid, :bye}
+        :ok
+      end
+
+      def handle_cast(:stop, state ) do
+        {:stop, :bye, state}
+      end
     end
 
+    # server will start
     assert {:ok, pid} = mod.start_link
+
+    # server will have a lock
+    assert {:error, :busy} = Mutex.lock(@mut, :gs)
     assert {:error, {:already_started, ^pid}} = mod.start_link
+
+    # on stop the lock is freed (this does not need uregister_name impl, it's
+    # done by the monitor in the mutex anyway).
+    assert :ok = GenServer.stop(pid)
+    assert {:ok, _} = Mutex.lock(@mut, :gs)
   end
 end