anchor.diff:  -behaviour(gen_event).
   
   %% export the private API
  --export([handle_async/2]).
  +-export([pending_result/3, established_result/1]).
   %% export the ocs_event_log API
   -export([notify/2]).
   
  
positive.code: 	end;
  handle_event1(Request, Profile,
  		#state{estabslished = true, pending = false} = State) ->
  	MFA = {?MODULE, handle_async, [State]},
  	Options = [{sync, false}, {receiver, MFA}],
  	case httpc:request(post, Request, [], Options, Profile) of
  		{ok, RequestId} when is_reference(RequestId) ->
  
negative.code: handle_event1(Request, Profile,
  		#state{estabslished = false, pending = false} = State) ->
  	NewState = State#state{estabslished = false, pending = true},
  	MFA = {?MODULE, pending_result, [self(), ?MODULE]},
  	Options = [{sync, false}, {receiver, MFA}],
  	case httpc:request(post, Request, [], Options, Profile) of
  		{ok, RequestId} when is_reference(RequestId) ->
  