anchor.diff:  
   end_per_suite(_Config) ->
       ok.
  +
  +
  +%%%===================================================================
  +%%% Internal definitions
  +%%%===================================================================
  +
  +mock_record_version(Config, RecordType, Version) ->
  +    Nodes = ?OZ_NODES(Config),
  +    ok = test_utils:mock_expect(Nodes, RecordType, get_record_version,
  +        fun() ->
  +            Version
  +        end
  +    ).
   
   %%%===================================================================
   %%% Record definitions
  
positive.code:     test_record_upgrade(Config, token, [1, 2]).
  
  
  test_record_upgrade(Config, Type, Versions) ->
      lists:foldl(fun(Version, RecordInOlderVersion) ->
          {NewVersion, NewRecord} = oz_test_utils:call_oz(
              Config, Type, upgrade_record, [Version - 1, RecordInOlderVersion]
          ),
          ?assertEqual({NewVersion, NewRecord}, {Version, get_record(Type, Version)}),
          NewRecord
      end, get_record(Type, hd(Versions)), tl(Versions)).
  
  
  %%%===================================================================
  
negative.code: -include_lib("ctool/include/logging.hrl").
  -include_lib("ctool/include/test/assertions.hrl").
  -include_lib("ctool/include/test/performance.hrl").
  
  -define(OZ_NODES(Config), ?config(oz_worker_nodes, Config)).
  
  %% API
  -export([
  