anchor.diff:      Ref = aest_nodes:export(n1, Tag, Cfg),
       [kill_node(N, Cfg) || N <- Nodes],
   
  -    %% Match "ok =" when we want to find errors in this stage
  -    ok = aest_nodes:ct_cleanup(Cfg),
  - 
  -    [{height, Height}, {source, Ref}|Cfg].
  -
  -end_per_group(long_chain, _Cfg) -> ok.
  -
  -init_per_testcase(_TC, Cfg) -> 
  -    aest_nodes:ct_setup(Cfg).
  -
  -end_per_testcase(_TC, Cfg) ->
  -    aest_nodes:ct_cleanup(Cfg).
  -
  -end_per_suite(_Cfg) -> ok.
  -
  -%=== TEST CASES ================================================================
  +    {save_config, [{height, Height}, {source, Ref}]}.
   
   startup_speed(Cfg) ->
       % This test verifies that startup does not take longer than mining
  
positive.code:         {sync_timeout, 1000}            % Per block
      ].
  
  init_per_group(long_chain, InitCfg) ->
      %% Some parameters depend on the speed and capacity of the docker containers:
      Cfg = aest_nodes:ct_setup(InitCfg),
  
      Nodes = [n1, n2, n3],
  
      setup_nodes(cluster(Nodes, #{}), Cfg),
  
negative.code:     [ {group, long_chain} ].
  
  groups() ->
      [{long_chain, [sequence], [
          long_chain_mine_and_export,
          {group, long_chain_tests}]},
       {long_chain_tests, [], [
          mining_governed_rate,
          startup_speed,
          startup_speed_mining,
  