anchor.diff:          true ->
               ok;
           false ->
  -            erlang:apply(Function, Args)
  +            %% @todo: change this once state is changed
  +            case Function of
  +                {TransFun, {AccId, WriteFun}} ->
  +                    BindFun = gen_write_fun(AccId, WriteFun),
  +                    BindFun(erlang:apply(TransFun, Args));
  +                _ -> erlang:apply(Function, Args)
  +            end
       end,
       {ok, State}.
  +
  +%%%===================================================================
  +%%% Internal functions
  +%%%===================================================================
   
   %% @doc Generate ReadFun.
   gen_read_fun(Id, ReadFun) ->
  
positive.code:                         exit({lasp_process, not_found})
                  end
          end.
  
negative.code: start_link(Args) ->
      lasp_process_sup:start_child(Args).
  
  start_dag_link(ReadFuns, TransFun, WriteFun) ->
      %% @todo, register in dag
      lasp_process_sup:start_child([ReadFuns, TransFun, WriteFun]).
  
  %%%===================================================================
  %%% Callbacks
  %%%===================================================================
  
  %% @doc Initialize state.
  init([ReadFuns, Function]) ->
      {ok, #state{read_funs=ReadFuns, function=Function}};
  
  init([ReadFuns, TransFun, WriteFun]) ->
      %% @todo: Add new fields to state
      {ok, #state{read_funs=ReadFuns, function={TransFun, WriteFun}}}.
  
  %% @doc Return list of read functions.
  read(#state{read_funs=ReadFuns0}=State) ->
  