anchor.diff:      receive
           {stop, LastPid} -> ok
       end.
  -
  -
  -dbg(Msg, Opts) ->
  -    case os:getenv("verbose") of
  -        false -> ok;
  -        _ -> io:format(Msg, Opts)
  -    end.
  
positive.code:             Pid ! {stop, self()}
      end;
  start_process(Count, ManagerPid) ->
      dbg("~p.", [Count]),
      NextPid = spawn(ring, start_process, [Count-1, ManagerPid]),
      %% Wait for a stop message
      receive
  
negative.code: -mode(compile).
  
  -export([create/1, stop/2, start_process/2]).
  
  -define(DBG(Msg, Opts), case os:getenv("verbose") of
      false -> ok;
      _ -> io:format(Msg, Opts)
  end).
  
  main([]) ->
      io:format("Usage: ./ring <number of processes>~n"),
  