anchor.diff:  
   call_behavior_func(#entity{} = Entity, Func, Args, State) ->
   	case call_behavior_func(Entity, Func, Args) of
  -		{Reply, NewEntity1} ->
  -			{Reply, update_entity_state(NewEntity1, State)};
  -		NewEntity2 ->
  -			update_entity_state(NewEntity2, State)
  +		{reply, Reply, NewEntity1} ->
  +			{reply, Reply, update_entity_state(NewEntity1, State)};
  +		{noreply, NewEntity2} ->
  +			{noreply, update_entity_state(NewEntity2, State)}
   	end;
   
   call_behavior_func(EntityID, Func, Args, State) ->
  
positive.code: 	% Call the behavior
  	try apply(Behavior, Func, Args) of
  		{undefined, NewEntity1} ->
  			NewEntity1;
  
  		{Update1, NewEntity2} ->
  			send_update(ClientInfo, EntityID, Update1),
  			NewEntity2;
  
  		{Reply1, undefined, NewEntity3} ->
  			{Reply1, NewEntity3};
  
  		{Reply2, Update2, NewEntity4} ->
  			send_update(ClientInfo, EntityID, Update2),
  			{Reply2, NewEntity4}
  
  	catch
  		Exception ->
  
negative.code: handle_cast({client_event, EntityID, Channel, EventType, Event}, State) ->
  	Entities = State#state.entities,
  	Entity = dict:fetch(EntityID, Entities),
  	call_behavior_func(Entity, client_event, [Entity, Channel, EventType, Event], State);
  
  handle_cast({send_entity, EntityID, TargetNode}, State) ->
  	Entities = State#state.entities,
  