anchor.diff:      %% Check that created contract account got credited correctly.
       ?assertEqual(aect_create_tx:amount(aetx:tx(Tx)),
                    aec_accounts:balance(aect_test_utils:get_account(ContractKey, S2))),
  -    %% Check that the miner got credited correctly.
  -    %% NG-NO_FEES
  -    %% ?assertEqual(aec_accounts:balance(aect_test_utils:get_account(?MINER_PUBKEY, S1))
  -    %%              + aect_create_tx:fee(aetx:tx(Tx))
  -    %%              + aect_create_tx:gas_price(aetx:tx(Tx)) * aect_call:gas_used(InitCall),
  -    %%              aec_accounts:balance(aect_test_utils:get_account(?MINER_PUBKEY, S2))),
   
       ok.
   
  
positive.code:                  - aect_create_tx:fee(aetx:tx(Tx))
                   - aect_create_tx:gas_price(aetx:tx(Tx)) * aect_call:gas_used(InitCall),
                   aec_accounts:balance(aect_test_utils:get_account(PubKey, S2))),
      %% Check that the miner got credited correctly.
      %% NG-NO_FEES
      %% ?assertEqual(aec_accounts:balance(aect_test_utils:get_account(?MINER_PUBKEY, S1))
      %%              + aect_create_tx:fee(aetx:tx(Tx))
      %%              + aect_create_tx:gas_price(aetx:tx(Tx)) * aect_call:gas_used(InitCall),
      %%              aec_accounts:balance(aect_test_utils:get_account(?MINER_PUBKEY, S2))),
      ok.
  
  create_contract(_Cfg) ->
  
negative.code:     ?assertEqual(aec_accounts:balance(aect_test_utils:get_account(ContractKey, S3))
                   + aect_call_tx:amount(aetx:tx(CallTx)),
                   aec_accounts:balance(aect_test_utils:get_account(ContractKey, S4))),
  
      {ok, S4}.
  
  