anchor.diff:       ?_assertEqual({"", "sp"}, get_suffix("sp")),
        ?_assertEqual({"foo", ".wsp"}, get_suffix("foo.WSP")),
        ?_assertEqual({"Foo", ".wsp"}, get_suffix("Foo.WSP"))
  +    ].
  +
  +metric_and_paths_test_() ->
  +    [?_assertEqual(error, metric_and_paths(<<"">>)),
  +     ?_assertEqual({[], <<"foo">>}, metric_and_paths(<<"foo">>)),
  +     ?_assertEqual({[<<"foo">>], <<"bar">>}, metric_and_paths(<<"foo.bar">>)),
  +     ?_assertEqual({[<<"foo">>, <<"bar">>], <<"test">>}, metric_and_paths(<<"foo.bar.test">>))
       ].
   
   convert_metric_test_() ->
  
positive.code:     end.
  
  
  get_suffix(File) ->
      get_suffix(lists:reverse(File), 4, []).
  
  
negative.code: 
  
  register_metric_handler(Path, Pid) ->
      {Paths, Name} = metric_and_paths(Path),
      Metric = #metric_file{name=Name, handler=Pid},
      gen_server:cast(?MODULE, {register_handler, Metric, Paths}).
  
  
  unregister_metric_handler(Path) ->
      register_metric_handler(Path, undefined).
  
  
  %%%===================================================================
  