anchor.diff:  %%--------------------------------------------------------------------
   handle_call({task_chain, TaskName}, _From, State = #state{tasks=Tasks}) ->
       TaskChain = resolve_tasks(reorder_tasks(gather_tasks(Tasks, TaskName, [])), Tasks, []),
  -    {reply, TaskChain, State}.
  +    {reply, TaskChain, State};
  +handle_call({task_def, TaskName}, _From, State = #state{tasks=Tasks}) ->
  +    Res = gb_trees:lookup(TaskName, Tasks),
  +    {reply, Res, State}.
  +
   
   %%--------------------------------------------------------------------
   %% @spec handle_cast(Msg, State) -> {noreply, State} |
  
positive.code: %% @end
  %%--------------------------------------------------------------------
  get_task_def(TaskName) when is_atom(TaskName) ->
      gen_server:cast(?SERVER, {task_def, TaskName}).
  
  
  %%====================================================================
  
negative.code: 
  -record(state, {tasks}).
  
  %%====================================================================
  %% API
  %%====================================================================
  