anchor.diff:          get(Ref)
       ).
   
  +bucket_type_and_table_name_must_match_test() ->
  +    Ref = make_ref(),
  +    Table_def =
  +        <<"CREATE TABLE times ",
  +          "(time TIMESTAMP NOT NULL, ",
  +          " PRIMARY KEY (time))">>,
  +    JSON = json_props([{bucket_type, my_type}, 
  +                       {table_def, Table_def}]),
  +    % if this error changes slightly it is not so important, as long as
  +    % the bucket type is not allowed to be created.
  +    ?assertError(
  +        {badmatch,
  +            {error,
  +                {bucket_type_and_table_name_different,
  +                    <<"my_type">>,<<"times">>}}},
  +        bucket_type_create(
  +            fun(Props) -> put(Ref, Props) end,
  +            <<"my_type">>,
  +            mochijson2:decode(JSON)
  +        )
  +    ).
  +
   -endif.
positive.code:     Ref = make_ref(),
      JSON = json_props([{bucket_type, my_type}]),
      bucket_type_create(
          fun(<<"my_type">>, Props) -> put(Ref, Props) end,
          <<"my_type">>,
          mochijson2:decode(JSON)
      ),
  
negative.code: bucket_type_create_with_timeseries_table_test() ->
      Ref = make_ref(),
      Table_def =
          <<"CREATE TABLE my_type ",
            "(time TIMESTAMP NOT NULL, ",
            " PRIMARY KEY (time))">>,
      JSON = json_props([{bucket_type, my_type}, 
  