anchor.diff:  let inline taskDone() = Task.FromResult(null) :> Task
   
   module Configurations =
  -    type BodyConfiguration<'TMessage> = {
  -        OnReceive: 'TMessage -> Task<obj>
  +    type BodyConfiguration = {
  +        OnReceive: obj -> Task<obj>
           OnReminder: (string -> Task) option
           OnActivate: (unit -> Task) option
           OnDeactivate: (unit -> Task) option
       }
   
  -    type ActorConfiguration<'TMessage> =  {
  +    type ActorConfiguration =  {
           Id: string
           KeepAlive: System.TimeSpan
  -        Body: unit->BodyConfiguration<'TMessage>
  +        Body: unit->BodyConfiguration
       }
   
   module ActorsRegister =
       open Configurations
   
  -    let mutable private actors  = Map.empty<string,ActorConfiguration<obj>>
  +    let mutable private actors  = Map.empty<string,ActorConfiguration>
   
       let addActor actor =
           actors<- actors.Add (actor.Id,actor)
  
positive.code:             member __.OnTimer (timer,state) = taskDone()
              member __.OnDeactivate () = taskDone()
  
      let toActorConfiguration (actorConfig: Configurations.ActorConfiguration<'a> ) =
          let actor = new ActorConfiguration(actorConfig.Id)
          actor.KeepAliveTimeout <- actorConfig.KeepAlive 
  
  
negative.code: //    type FSharpActor(actor: Configurations.ActorConfiguration<'a> ) = 
  //            inherit EndpointConfiguration(actor.Id)
  
      type FSharpInvoker(body: Configurations.BodyConfiguration) = 
          interface IActorInvoker with 
              member __.OnActivate () =  
                                              match body.OnActivate  with
  