anchor.diff:  test_schema_presentlookup() ->
       SchemaIn  = #{<<"age">> => {1,[]}, <<"earthling">> => {2,[]}, <<"foo">> => {3,[]}, <<"name">> => {4,[]}, <<"surname">> => {5,[]}},
       Out       = lookup_schema(SchemaIn,rerest_test_schema),
  -    ?assert(1 =:= length(mensia:dirty_all_keys(rerest_test_schema))),
  +    ?assert(1 =:= length(mnesia:dirty_all_keys(rerest_test_schema))),
       ?assert(is_record(Out,rerest_schema)).
   
   -define(REREST_TEST_DBDATA,#{rerest_test_schema => record_info(fields,rerest_schema),
  
positive.code:     case mnesia:dirty_match_object(Pattern) of
          [Schema] -> Schema;
          _        -> NewSchema   = build_schema(Sch,fun() -> ?AUTOINCREMENT(T) end),
                      {atomic,ok} = mnesia:transaction(fun() -> mnesia:write(NewSchema) end),
                      lager:notice("~s created new schema with fields:\n\t~p",
                                  [?LAGER_I,NewSchema#rerest_schema.keys]),
                      NewSchema
  
negative.code: -module(rerest_mnesia_store).
  -include_lib("configuration.hrl").
  
  -compile(export_all).
  
  -export([init/0]).
  
  