anchor.diff:  
   -export([foldl/4]).
   
  +-export([is_row_type/2]).
  +
   -spec foldl(User :: any(), FoldFun :: function(), InputAcc :: any(),
               Channel :: binary()) -> OutPutAcc :: any().
   foldl(_User, FoldFun, InputAcc, Channel) when is_function(FoldFun, 2) ->
  
positive.code: create_check_channel(Channel) ->
      create_check_channel(Channel, [audit,history]).
  
  -spec create_check_channel(binary()|atom(), [atom()|{atom(),any()}]) -> #skvhCtx{}.
  create_check_channel(Channel, Options) ->
  	Main = table_name(Channel),
  
negative.code:         ?assertMatch({ok, [_,_]}, write(system,<<"lstChannel">>,[{1,[a]},{2,[b]}])),
          ?assertMatch({ok, [_,_]}, write(system,<<"binChannel">>,[{1,<<"a">>},{2,<<"b">>}])),
  
          ?assertException(throw, {ClEr,{"Bad datatype, expected map",[a]}},
                           write(system,<<"mapChannel">>,[{1,[a]},{2,[b]}])),
          ?assertException(throw, {ClEr,{"Bad datatype, expected map",<<"a">>}},
                           write(system,<<"mapChannel">>,[{1,<<"a">>},{2,<<"b">>}])),
          ?assertException(throw, {ClEr,{"Bad datatype, expected list",#{a:=1}}},
                           write(system,<<"lstChannel">>,[{1,#{a=>1}},{2,#{b=>2}}])),
          ?assertException(throw, {ClEr,{"Bad datatype, expected list",<<"a">>}},
                           write(system,<<"lstChannel">>,[{1,<<"a">>},{2,<<"b">>}])),
          ?assertException(throw, {ClEr,{"Bad datatype, expected binary",#{a:=1}}},
                           write(system,<<"binChannel">>,[{1,#{a=>1}},{2,#{b=>2}}])),
          ?assertException(throw, {ClEr,{"Bad datatype, expected binary",[a]}},
                           write(system,<<"binChannel">>,[{1,[a]},{2,[b]}])),
  
          ?assertEqual(<<"skvhTest">>, table_name(Channel)),
  
  