anchor.diff:      Opts = OptsIn ++ [{args, Args}, exit_status],
       error_logger:info_msg("port server starting: ~p in ~p with ~p / ~p~n",
                             [Cmd, Pwd, Args, Opts]),
  -    process_flag(trap_exit, true),
       open_port({spawn_executable, Cmd}, Opts).
   
   
  
positive.code:     error_logger:info_msg("port server terminating ~p: ~p~n",
                            [State#state.name, normal]),
      ok;
  terminate({port_exited, normal}, State) ->
      error_logger:info_msg("port server terminating ~p: port exited~n",
                            [State#state.name]),
      ok;
  terminate(Reason, State) ->
      error_logger:info_msg("port server terminating ~p: ~p~n",
                            [State#state.name, Reason]),
      true = port_close(State#state.port).
  
  code_change(_OldVsn, State, _Extra) ->
      {ok, State}.
  
negative.code:                  {stop, Port}
      end.
  
  handle_info({_Port, {data, Msg}}, State) ->
      error_logger:info_msg("Message from ~p: ~s~n", [State#state.name, Msg]),
      {noreply, State};
  handle_info({_Port, {exit_status, Status}}, State) ->
      error_logger:info_msg("~p exited with status ~p~n",
                            [State#state.name, Status]),
      {stop, normal, State};
  handle_info(Something, State) ->
      error_logger:info_msg("Got unexpected message while monitoring ~p: ~p~n",
                            [State#state.name, Something]),
  