anchor.diff:  handle_call(stop, _, P) ->
   	{stop, shutdown, stopped, P}.
   
  +handle_cast({cast,Msg},P) ->
  +	Bin = term_to_binary({undefined,Msg},[compressed,{minor_version,1}]),
  +	handle_call({sendbin,Bin},undefined,P#dp{callcount = P#dp.callcount + 1});
   handle_cast(decr_callcount,P) ->
   	{noreply,P#dp{callcount = P#dp.callcount - 1}};
   handle_cast(_, P) ->
  
positive.code: 		X ->
  			X
  	end.
  
  start() ->
  	gen_server:start_link({local, ?MODULE}, ?MODULE, [], []).
  
negative.code: -behaviour(gen_server).
  -include("bkdcore.hrl").
  % API
  -export([call/2,cast/2]).
  % gen_server
  -export([start/0,start/1, stop/1,stop/0, init/1, handle_call/3, 
   		  handle_cast/2, handle_info/2, terminate/2, code_change/3,t/0]).
  