anchor.diff:  		tracker_pid = none,
   		file_system_pid = none,
   		disk_state = none,
  +		available_peers = [],
   	        torrent_pid = none}).
   
   %%====================================================================
  
positive.code: %%--------------------------------------------------------------------
  %%% Internal functions
  %%--------------------------------------------------------------------
  add_filesystem(FileDict, S) ->
      {ok, FS} = file_system:start_link(FileDict),
      {ok, FS, S#state{file_system_pid = FS}}.
  
negative.code: started(stop, S) ->
      {stop, argh, S};
  started({new_ips, IPList}, S) ->
      {ok, NS1} = add_peers(IPList, S),
      io:format("Possible peers: ~p~n", [NS1#state.available_peers]),
      {ok, NS2} = start_new_peers(NS1),
      {next_state, started, NS2};
  started({tracker_error_report, Reason}, S) ->
      io:format("Got tracker error: ~s~n", [Reason]),
      {next_state, started, S};
  