anchor.diff:  -export([start_link/2, start/1]).
   
   -export([get_status/1, sys_info/1, etop/1, memory/1, set_alive/1, pid_info/2]).
  --export([get_applications/1]). 
  +-export([get_applications/1, get_app_info/2]). 
   
   %% ====================================================================
   %% External functions
   %% ====================================================================
  +get_app_info(Node, App) ->
  +	gen_server:call(Node, {app_info, Node, App}).
  +
   get_applications(Node) ->
   	gen_server:call(Node, {applications, Node}).
   
  
positive.code: get_timestamp() ->
      date:get_timestamp().
  
  %% --------------------------------------------------------------------
  %%% Test functions
  %% --------------------------------------------------------------------
  -include_lib("eunit/include/eunit.hrl").
  -ifdef(TEST).
  -endif.
  
  
  
negative.code: %% --------------------------------------------------------------------
  handle_call(get_state, From, #state{status = Status, ip = Ip, time = Time, node = Node, reason = Reason} = State) -> 	
      {reply, {Node, [{ip, ip_device:ip_as_string(Ip)}, {state, Status}, {time, date:timestamp_to_date(Time)}, {reason, Reason}]}, State};
  
  handle_call({app_info, Node, App}, From, State) ->
  	Reply = get_app_info1(Node, App),
  	{reply, Reply, State};
  
  handle_call({applications, Node}, From, State) ->
  	Reply = get_applications1(Node),
  