anchor.diff:  create_tx(Owner, Spec0, State) ->
       Spec = maps:merge(
           #{ abi_version => aect_test_utils:latest_sophia_abi_version()
  -         , vm_version  => vm_version()
  +         , vm_version  => maps:get(vm_version, Spec0, vm_version())
            , fee         => 1000000
            , deposit     => 10
            , amount      => 200
  
positive.code:                 fun(_) -> ?MINERVA_PROTOCOL_VSN end),
      [{sophia_version, ?AESOPHIA_2}, {vm_version, ?VM_AEVM_SOPHIA_2},
       {protocol, minerva} | Cfg];
  init_per_group(_Grp, Cfg) ->
      Cfg.
  
  end_per_group(Grp, Cfg) when Grp =:= aevm_1; Grp =:= aevm_2 ->
      meck:unload(aec_hard_forks),
      Cfg;
  end_per_group(_Grp, Cfg) ->
  
negative.code: %%%===================================================================
  
  all() ->
      [{group, vm_interaction}, {group, aevm_1}, {group, aevm_2}].
  
  %% To skip one level of indirection...
  -define(ALL_TESTS, [{group, transactions}, {group, state_tree}, {group, sophia},
  