anchor.diff:      gen_fsm:send_all_state_event(Pid, stop).
   
   %%
  -%% @equiv call(Instance, Module, Function, Args, [])
  -%%
  -
  --spec call(Instance::pid(), Module::atom(), Function::atom(), Args::list()) ->
  -    Result::term().
  -
  -call(Instance, Module, Function, Args) ->
  -    call(Instance, Module, Function, Args, []).
  -
  -%%
   %% @doc Call remote function with arguments and options and return result
   %%
   
  
positive.code:             % TODO: Unpack Error if needed
              erlang:error(Error)
      end.
  
  %%
  %% @equiv switch(Instance, Module, Function, Args, [])
  %%
  
  -spec switch(Instance::pid(), Module::atom(), Function::atom(),
          Args::list()) ->
      Result::term().
  
  switch(Instance, Module, Function, Args) ->
      switch(Instance, Module, Function, Args, []).
  
  %%
  %% @doc Pass control to remote side by calling the function with arguments
  
negative.code: 
  -export([
      stop/1,
      call/5,
      switch/5
      ]).
  
  %% Behaviour callbacks
  -export([
      init/1,
      client/2,
  