anchor.diff:              io:format("~p~n", [Reason]),
               Pid1 ! quit
       end.
  -    
  +
  +%% queue is the underlying server loop for the queue
  +%%
  +%% We support several operations:
  +%%    - Quit
  +%%        Quit will end the server loop.
  +%%    - push
  +%%        Push takes two arguments, Who and Element. We take the Pid
  +%%        of the caller and the Element they want to push and store
  +%%        the element in our queue.
  +%%   -  pop
  +%%        Pop takes the Pid of the caller and dumps out all of the
  +%%        stored values to the caller.
  +%%   -  save
  +%%        Save forces all the in-memory items to-disk so they can be
  +%%        persisted in the case of failure.
   queue(Settings, State) ->
       receive
           quit ->
  
positive.code: -module(diskqueue).
  -compile(export_all).
  
  newqueue(Name) ->
      Pid1 = spawn(?MODULE, queue, [dict:from_list([{"file", Name}]), []]),
      Pid2 = spawn(?MODULE, timerout, [Pid1, [10000, 3000]]),
      spawn(?MODULE, monitor, [Pid1, Pid2]),
      Pid1.
  
  monitor(Pid1, Pid2) ->
      process_flag(trap_exit, true),
      link(Pid1),
  
negative.code:             end
      end.
  
  %% Helper to log messages.
  logerror(Pid, Message) ->
      io:format("Pid: ~p ~p", [Pid, Message]).
  