anchor.diff:  
   update(Case, #ctx{pid = Pid, modules = Modules} = Ctx) ->
       update_definitions(Case, Ctx),
  -    upgrade_release(Pid, Modules).
  +    upgrade_release(Pid, Modules),
  +    wait_update(Ctx).
   
   update_definitions(data_file, #ctx{file = File}) ->
       {ok, _} = file:copy(?DATA_FILE2, File),
  
positive.code:     ?_test(begin
          subscribe(Ctx, test_app, Key),
          update(functions, Ctx),
          timer:sleep(200),
          Result = get(Ctx, is_called),
          ExpectedDefs = [
              {provider1,[{inc,2},{fail,2}]},
  
negative.code:             timer:sleep(100);
          false ->
              ok
      end.
  
  wait_update(Ctx) ->
      case get(Ctx, is_called) of
          error ->
              timer:sleep(100),
              wait_update(Ctx);
          _ -> ok
      end.
  
  %% ------------
  