anchor.diff:          agent.post 10
   
           test <@ res = ref (0, 10) @>
  +        
  +    [<Fact>]
  +    let ``Should not trigger events for failure`` () =
  +        let agent = Agent.create 0 (fun _ _ -> Failure "test") 
  +
  +        let triggered = ref false
  +        agent.event |> Event.add (fun _ -> triggered := true)
  +
  +        agent.post 10
  +
  +        test <@ triggered = ref false @>
           
positive.code:             @>
  
      [<Fact>]
      let ``Should trigger events`` () =
          let agent = Agent.create 0 testF
  
          let res = ref (0, 0)
  
negative.code: module ``Agent Tests`` =
      open System.Threading
  
      let testF x y = x + y |> Success
  
      [<Fact>]
      let ``Should create agent`` () =
  