anchor.diff:  
   
   terminate(_Reason, State) ->
  +    gen_tcp:close(State#state.ticker_sock),
       {ok, State}.
   
   
  
positive.code: 
  
  handle_info(init, State) ->
      schedule_next(get_quotes),
      {noreply, State, hibernate};
  
  handle_info(get_quotes, #state{name=N, portfolio=P, cashflow=CF}=State) ->
      {Portfolio, CashFlow} = make_transaction(get_quotes(), N, P, CF),
      schedule_next(get_quotes),
      {noreply, State#state{portfolio=Portfolio, cashflow=CashFlow}, hibernate};
  
  handle_info(Msg, State) ->
      io:format("UNEXPECTED MESSAGE:~n~p~n", [Msg]),
  
negative.code: %% Internal
  %% ============================================================================
  
  get_quotes(Sock) ->
      ok = gen_tcp:send(Sock, "\n"),
      receive
          {tcp, Sock, Data} -> binary_to_term(Data)
      end.
  
  
  