anchor.diff:      E1 = process_opts(E, OptsTemplate ++ Opts),
       case Res = M:new(Name, Type, E1#exometer_entry.options) of
          ok        -> 
  -	     %% ?info("exometer:create_entry(): M(~p) Type(~p) Name(~p) Opt(~p) Res(ok)~n",
  -             %%   [M, Type, Name, OptsTemplate ++ Opts]),
  -
              [ets:insert(T, E1) || T <- exometer:tables()];
          {ok, Ref} ->
  -            %% ?info("exometer:create_entry(): M(~p) Type(~p) Name(~p) Opt(~p) Res({ok, ~p})~n",
  -            %%    [M, Type, Name, OptsTemplate ++ Opts, Ref]),
              [ets:insert(T, E1#exometer_entry{ ref = Ref }) || T <- exometer:tables()];
          _ -> 
  -            %% ?info("exometer:create_entry(): M(~p) Type(~p) Name(~p) Opt(~p) Res(~p)~n",
  -            %%    [M, Type, Name, OptsTemplate ++ Opts, Res]),
              true
       end,
       Res.
  
positive.code: 		options = [ {Opt, Val} | [O || {K,_} = O <- Opts1,
  					       K =/= Opt] ] }
        end, Entry, Options).
  
  
negative.code:     create_entry(E#exometer_entry { name = Name }, Opts).
  
  
  
  -spec update(name(), value()) -> ok | error().
  update(Name, Value) when is_list(Name) ->
      case ets:lookup((Tab = exometer:table()), Name) of
  	[#exometer_entry{module = ?MODULE, type = counter}] ->
  	    ets:update_counter(Tab, Name, {#exometer_entry.value, Value}),
  	    ok;
  	[#exometer_entry{module = M, type = Type, ref = Ref}] ->
  	    M:update(Name, Value, Type, Ref);
  