anchor.diff:  -include_lib("eunit/include/eunit.hrl").
   
   %% Server state
  --record(state, {port, name, params, started}).
  +-record(state, {port, name, params}).
   
   % ----------------------------------------------
   
  
positive.code: init({Name, _Cmd, _Args, _Opts} = Params) ->
      Port = open_port(Params),
      case is_port(Port) of
          true  -> {ok, #state{port = Port, name = Name, params = Params,
                               started = now()}};
          false -> ns_log:log(?MODULE, 0001, "could not start process: ~p",
                              [Params]),
                   {stop, Port}
  
negative.code: 
  handle_info({'EXIT', _Port, Reason}, State) ->
      error_logger:info_msg("port server (~p) exited: ~p~n",
                            [State#state.name, Reason]);
  handle_info(Something, State) ->
      error_logger:info_msg("Got unexpected message while monitoring ~p: ~p~n",
                            [State#state.name, Something]),
  