anchor.diff:      {_, TopHeight} = proplists:lookup(db_backup_top_height, Cfg),
       {_, _TopHash} = proplists:lookup(db_backup_top_hash, Cfg),
       HeightOfNewProtocol = ?HEIGHT_OF_NEW_PROTOCOL(TopHeight),
  -    #{height := TopHeight} = aest_nodes:get_top(new_node3, Cfg),
  +    #{version := ?GENESIS_PROTOCOL_VERSION,
  +      height := TopHeight} = aest_nodes:get_top(new_node3, Cfg),
       HeightToBeMinedWithOldProtocol = - 1 + HeightOfNewProtocol,
       {true, _} = {HeightToBeMinedWithOldProtocol > TopHeight,
                    {check_at_least_a_block_to_mine_using_old_protocol,
  
positive.code: 
  -define(DB_BACKUP_DEST_DIR, "/tmp/mnesia_backup").
  
  -define(PROTOCOLS(H), #{9 => 0, 10 => H}).
  
  -define(HEIGHT_OF_NEW_PROTOCOL(OldChainHeight),
          (2 + OldChainHeight)
  
negative.code:     HeightOfNewProtocol = ?HEIGHT_OF_NEW_PROTOCOL(TopHeight),
      HeightToBeMinedWithNewProtocol = 1 + HeightOfNewProtocol, %% I.e. two blocks with new protocol.
      wait_for_height_syncing(HeightToBeMinedWithNewProtocol, [new_node3], {{10000, ms}, {1000, blocks}}, Cfg),
      #{version := ?NEW_PROTOCOL_VERSION,
        hash := HashMined} = get_block_by_height(new_node3, HeightToBeMinedWithNewProtocol, Cfg),
      %% Ensure distinct non-mining node can sync mined block(s).
      wait_for_height_syncing(HeightToBeMinedWithNewProtocol, [new_node4], {{45000, ms}, {1000, blocks}}, Cfg),
      ?assertEqual(HashMined, maps:get(hash, get_block_by_height(new_node4, HeightToBeMinedWithNewProtocol, Cfg))),
  